DATASET LA LIGA
Enrique Roa, Miguel Ocón, Sergio Fernández
12 de enero de 2023
1 INTRODUCCIÓN Y DEFINICIÓN DE OBJETIVOS
En este proyecto vamos a estudiar el dataset llamado “combined_data_laliga.csv” (kaggle - La Liga Match Data) donde se encuentran todos los partidos de la temporada 2014 hasta la temporada 2020, ambas incluidas, con una recopilación de los principales eventos que ocurren en un partido, goles, tiros a puerta, faltas, tarjetas…
- ¿Qué hace que un equipo gane un partido?
- ¿Qué variables influyen en las victorias?
- ¿Es posible predecir el ganador de un partido?
Para dar respuesta a todas estas preguntas estos han sido los pasos que hemos ido dando en nuestro estudio:
- Lectura y exploración inicial
- Limpieza de datos
- Trasformación de variables
- División del dataset en train (2014 - 2019) y test (2020)
- EDA
- Regresión
1.1 LIBRERÍAS UTILIZADAS
library(dplyr)
library(tidyr)
library(knitr)
library(readr)
library(ggplot2)
library(cowplot)
library(GGally)
library(plotrix)
library(ggcorrplot)
## [1] "Versión de R: R version 4.1.2 (2021-11-01)"
1.2 LECTURA DE DATOS
laliga <- read_csv("combined_data_laliga.csv")
2 ANÁLISIS EXPLORATORIO INICIAL
Visualización de los primeros registros:
head(laliga)## # A tibble: 6 × 41
## ...1 Home Tea…¹ Away …² Score Half …³ Match…⁴ Home …⁵ Away …⁶ Home …⁷ Away …⁸
## <dbl> <chr> <chr> <chr> <chr> <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 0 MÁLAGA ATHLET… 1-0 1-0 4.4 6 5.7 40 60
## 2 1 SEVILLA FC VALENC… 1-1 1-0 4.7 6.5 6.8 47 53
## 3 2 GRANADA DEPORT… 2-1 0-1 4.6 7.2 5.9 53 47
## 4 3 ALMERÍA ESPANY… 1-1 0-0 5.6 6.9 5.5 56 44
## 5 4 EIBAR REAL S… 1-0 1-0 3.7 6.5 5.9 41 59
## 6 5 BARCELONA ELCHE 3-0 1-0 5.1 8 5.3 72 28
## # … with 31 more variables: `Home Team Off Target Shots` <dbl>,
## # `Home Team On Target Shots` <dbl>, `Home Team Total Shots` <dbl>,
## # `Home Team Blocked Shots` <dbl>, `Home Team Corners` <dbl>,
## # `Home Team Throw Ins` <dbl>, `Home Team Pass Success %` <dbl>,
## # `Home Team Aerials Won` <dbl>, `Home Team Clearances` <dbl>,
## # `Home Team Fouls` <dbl>, `Home Team Yellow Cards` <dbl>,
## # `Home Team Second Yellow Cards` <dbl>, `Home Team Red Cards` <dbl>, …
Exploración inicial de datos y su estructura a través de estadísticos principales:
str(laliga)## spc_tbl_ [2,660 × 41] (S3: spec_tbl_df/tbl_df/tbl/data.frame)
## $ ...1 : num [1:2660] 0 1 2 3 4 5 6 7 8 9 ...
## $ Home Team : chr [1:2660] "MÁLAGA" "SEVILLA FC" "GRANADA" "ALMERÍA" ...
## $ Away Team : chr [1:2660] "ATHLETIC" "VALENCIA" "DEPORTIVO" "ESPANYOL" ...
## $ Score : chr [1:2660] "1-0" "1-1" "2-1" "1-1" ...
## $ Half Time Score : chr [1:2660] "1-0" "1-0" "0-1" "0-0" ...
## $ Match Excitement : num [1:2660] 4.4 4.7 4.6 5.6 3.7 5.1 7 4.7 4.7 2.1 ...
## $ Home Team Rating : num [1:2660] 6 6.5 7.2 6.9 6.5 8 7.3 5.6 6.9 6.9 ...
## $ Away Team Rating : num [1:2660] 5.7 6.8 5.9 5.5 5.9 5.3 5.5 7.3 5.5 5.9 ...
## $ Home Team Possession % : num [1:2660] 40 47 53 56 41 72 59 53 63 59 ...
## $ Away Team Possession % : num [1:2660] 60 53 47 44 59 28 41 47 37 41 ...
## $ Home Team Off Target Shots : num [1:2660] 5 4 6 7 5 5 4 4 3 5 ...
## $ Home Team On Target Shots : num [1:2660] 3 3 3 6 5 6 9 2 8 2 ...
## $ Home Team Total Shots : num [1:2660] 12 12 10 19 12 12 20 9 14 8 ...
## $ Home Team Blocked Shots : num [1:2660] 4 5 1 6 2 1 7 3 3 1 ...
## $ Home Team Corners : num [1:2660] 5 3 5 11 5 3 4 3 8 2 ...
## $ Home Team Throw Ins : num [1:2660] 13 20 25 26 28 23 21 16 25 23 ...
## $ Home Team Pass Success % : num [1:2660] 69 76 79 81 60 93 82 80 88 79 ...
## $ Home Team Aerials Won : num [1:2660] 11 13 20 19 29 2 27 19 23 21 ...
## $ Home Team Clearances : num [1:2660] 16 16 21 25 17 2 15 12 13 20 ...
## $ Home Team Fouls : num [1:2660] 13 23 13 8 13 11 19 11 9 13 ...
## $ Home Team Yellow Cards : num [1:2660] 3 4 1 3 4 0 4 1 1 2 ...
## $ Home Team Second Yellow Cards: num [1:2660] 0 0 0 0 0 0 0 0 0 0 ...
## $ Home Team Red Cards : num [1:2660] 2 0 0 0 0 1 0 0 0 0 ...
## $ Away Team Off Target Shots : num [1:2660] 5 5 1 6 7 3 8 5 6 3 ...
## $ Away Team On Target Shots : num [1:2660] 5 1 1 2 4 0 3 6 2 2 ...
## $ Away Team Total Shots : num [1:2660] 12 11 8 12 19 3 12 12 8 9 ...
## $ Away Team Blocked Shots : num [1:2660] 2 5 6 4 8 0 1 1 0 4 ...
## $ Away Team Corners : num [1:2660] 4 3 3 7 6 1 4 4 5 4 ...
## $ Away Team Throw Ins : num [1:2660] 22 27 30 19 36 19 19 14 18 34 ...
## $ Away Team Pass Success % : num [1:2660] 84 79 76 70 75 81 74 78 79 68 ...
## $ Away Team Aerials Won : num [1:2660] 17 14 10 11 25 4 22 21 15 26 ...
## $ Away Team Clearances : num [1:2660] 14 16 14 20 20 17 7 18 27 15 ...
## $ Away Team Fouls : num [1:2660] 9 8 26 9 14 13 15 14 13 17 ...
## $ Away Team Yellow Cards : num [1:2660] 3 2 3 3 1 1 1 3 2 2 ...
## $ Away Team Second Yellow Cards: num [1:2660] 0 0 0 1 0 0 0 0 0 0 ...
## $ Away Team Red Cards : num [1:2660] 0 1 0 0 0 0 0 0 0 0 ...
## $ Home Team Goals Scored : num [1:2660] 1 1 2 1 1 3 3 0 2 0 ...
## $ Away Team Goals Scored : num [1:2660] 0 1 1 1 0 0 1 2 0 0 ...
## $ Home Team Goals Conceeded : num [1:2660] 0 1 1 1 0 0 1 2 0 0 ...
## $ Away Team Goals Conceeded : num [1:2660] 1 1 2 1 1 3 3 0 2 0 ...
## $ year : num [1:2660] 2014 2014 2014 2014 2014 ...
## - attr(*, "spec")=
## .. cols(
## .. ...1 = col_double(),
## .. `Home Team` = col_character(),
## .. `Away Team` = col_character(),
## .. Score = col_character(),
## .. `Half Time Score` = col_character(),
## .. `Match Excitement` = col_double(),
## .. `Home Team Rating` = col_double(),
## .. `Away Team Rating` = col_double(),
## .. `Home Team Possession %` = col_double(),
## .. `Away Team Possession %` = col_double(),
## .. `Home Team Off Target Shots` = col_double(),
## .. `Home Team On Target Shots` = col_double(),
## .. `Home Team Total Shots` = col_double(),
## .. `Home Team Blocked Shots` = col_double(),
## .. `Home Team Corners` = col_double(),
## .. `Home Team Throw Ins` = col_double(),
## .. `Home Team Pass Success %` = col_double(),
## .. `Home Team Aerials Won` = col_double(),
## .. `Home Team Clearances` = col_double(),
## .. `Home Team Fouls` = col_double(),
## .. `Home Team Yellow Cards` = col_double(),
## .. `Home Team Second Yellow Cards` = col_double(),
## .. `Home Team Red Cards` = col_double(),
## .. `Away Team Off Target Shots` = col_double(),
## .. `Away Team On Target Shots` = col_double(),
## .. `Away Team Total Shots` = col_double(),
## .. `Away Team Blocked Shots` = col_double(),
## .. `Away Team Corners` = col_double(),
## .. `Away Team Throw Ins` = col_double(),
## .. `Away Team Pass Success %` = col_double(),
## .. `Away Team Aerials Won` = col_double(),
## .. `Away Team Clearances` = col_double(),
## .. `Away Team Fouls` = col_double(),
## .. `Away Team Yellow Cards` = col_double(),
## .. `Away Team Second Yellow Cards` = col_double(),
## .. `Away Team Red Cards` = col_double(),
## .. `Home Team Goals Scored` = col_double(),
## .. `Away Team Goals Scored` = col_double(),
## .. `Home Team Goals Conceeded` = col_double(),
## .. `Away Team Goals Conceeded` = col_double(),
## .. year = col_double()
## .. )
## - attr(*, "problems")=<externalptr>
summary(laliga) ## ...1 Home Team Away Team Score
## Min. : 0.0 Length:2660 Length:2660 Length:2660
## 1st Qu.: 664.8 Class :character Class :character Class :character
## Median :1329.5 Mode :character Mode :character Mode :character
## Mean :1329.5
## 3rd Qu.:1994.2
## Max. :2659.0
## Half Time Score Match Excitement Home Team Rating Away Team Rating
## Length:2660 Min. : 1.400 Min. : 2.800 Min. : 3.000
## Class :character 1st Qu.: 3.900 1st Qu.: 5.700 1st Qu.: 5.400
## Mode :character Median : 5.100 Median : 6.400 Median : 6.000
## Mean : 5.249 Mean : 6.369 Mean : 6.045
## 3rd Qu.: 6.300 3rd Qu.: 6.900 3rd Qu.: 6.600
## Max. :10.000 Max. :10.000 Max. :10.000
## Home Team Possession % Away Team Possession % Home Team Off Target Shots
## Min. :18.00 Min. :17.00 Min. : 0.000
## 1st Qu.:44.00 1st Qu.:41.00 1st Qu.: 4.000
## Median :52.00 Median :48.00 Median : 5.000
## Mean :51.54 Mean :48.46 Mean : 5.533
## 3rd Qu.:59.00 3rd Qu.:56.00 3rd Qu.: 7.000
## Max. :83.00 Max. :82.00 Max. :18.000
## Home Team On Target Shots Home Team Total Shots Home Team Blocked Shots
## Min. : 0.000 Min. : 2.00 Min. : 0.000
## 1st Qu.: 3.000 1st Qu.:10.00 1st Qu.: 1.000
## Median : 4.000 Median :13.00 Median : 3.000
## Mean : 4.648 Mean :13.08 Mean : 2.913
## 3rd Qu.: 6.000 3rd Qu.:16.00 3rd Qu.: 4.000
## Max. :17.000 Max. :33.00 Max. :12.000
## Home Team Corners Home Team Throw Ins Home Team Pass Success %
## Min. : 0.000 Min. : 5.0 Min. :46.00
## 1st Qu.: 3.000 1st Qu.:18.0 1st Qu.:73.00
## Median : 5.000 Median :22.0 Median :78.00
## Mean : 5.395 Mean :22.5 Mean :77.71
## 3rd Qu.: 7.000 3rd Qu.:27.0 3rd Qu.:84.00
## Max. :20.000 Max. :49.0 Max. :93.00
## Home Team Aerials Won Home Team Clearances Home Team Fouls
## Min. : 2.0 Min. : 1.00 Min. : 1.00
## 1st Qu.:12.0 1st Qu.:12.00 1st Qu.:11.00
## Median :16.0 Median :17.00 Median :14.00
## Mean :17.1 Mean :17.71 Mean :13.75
## 3rd Qu.:22.0 3rd Qu.:22.00 3rd Qu.:16.00
## Max. :52.0 Max. :61.00 Max. :33.00
## Home Team Yellow Cards Home Team Second Yellow Cards Home Team Red Cards
## Min. :0.000 Min. :0.00000 Min. :0.00000
## 1st Qu.:1.000 1st Qu.:0.00000 1st Qu.:0.00000
## Median :2.000 Median :0.00000 Median :0.00000
## Mean :2.417 Mean :0.05602 Mean :0.04699
## 3rd Qu.:3.000 3rd Qu.:0.00000 3rd Qu.:0.00000
## Max. :8.000 Max. :2.00000 Max. :2.00000
## Away Team Off Target Shots Away Team On Target Shots Away Team Total Shots
## Min. : 0.00 Min. : 0.000 Min. : 0.00
## 1st Qu.: 3.00 1st Qu.: 2.000 1st Qu.: 7.00
## Median : 4.00 Median : 3.000 Median :10.00
## Mean : 4.32 Mean : 3.669 Mean :10.36
## 3rd Qu.: 6.00 3rd Qu.: 5.000 3rd Qu.:13.00
## Max. :14.00 Max. :13.000 Max. :28.00
## Away Team Blocked Shots Away Team Corners Away Team Throw Ins
## Min. : 0.000 Min. : 0.000 Min. : 3.00
## 1st Qu.: 1.000 1st Qu.: 2.000 1st Qu.:17.00
## Median : 2.000 Median : 4.000 Median :21.00
## Mean : 2.391 Mean : 4.215 Mean :21.48
## 3rd Qu.: 3.000 3rd Qu.: 6.000 3rd Qu.:26.00
## Max. :13.000 Max. :32.000 Max. :45.00
## Away Team Pass Success % Away Team Aerials Won Away Team Clearances
## Min. :41.0 Min. : 0.00 Min. : 1.00
## 1st Qu.:71.0 1st Qu.:11.00 1st Qu.:14.00
## Median :77.0 Median :16.00 Median :20.00
## Mean :75.9 Mean :16.75 Mean :21.43
## 3rd Qu.:82.0 3rd Qu.:21.00 3rd Qu.:27.00
## Max. :93.0 Max. :53.00 Max. :63.00
## Away Team Fouls Away Team Yellow Cards Away Team Second Yellow Cards
## Min. : 0.00 Min. :0.000 Min. :0.00000
## 1st Qu.:11.00 1st Qu.:2.000 1st Qu.:0.00000
## Median :13.00 Median :3.000 Median :0.00000
## Mean :13.77 Mean :2.641 Mean :0.07744
## 3rd Qu.:16.00 3rd Qu.:4.000 3rd Qu.:0.00000
## Max. :30.00 Max. :8.000 Max. :2.00000
## Away Team Red Cards Home Team Goals Scored Away Team Goals Scored
## Min. :0.00000 Min. : 0.000 Min. :0.000
## 1st Qu.:0.00000 1st Qu.: 1.000 1st Qu.:0.000
## Median :0.00000 Median : 1.000 Median :1.000
## Mean :0.04887 Mean : 1.518 Mean :1.141
## 3rd Qu.:0.00000 3rd Qu.: 2.000 3rd Qu.:2.000
## Max. :2.00000 Max. :10.000 Max. :8.000
## Home Team Goals Conceeded Away Team Goals Conceeded year
## Min. :0.000 Min. : 0.000 Min. :2014
## 1st Qu.:0.000 1st Qu.: 1.000 1st Qu.:2015
## Median :1.000 Median : 1.000 Median :2017
## Mean :1.141 Mean : 1.518 Mean :2017
## 3rd Qu.:2.000 3rd Qu.: 2.000 3rd Qu.:2019
## Max. :8.000 Max. :10.000 Max. :2020
El dataframe contiene todos los partidos de la liga española de 7
temporadas (de 2014 a 2020).
- 2660 observaciones (partidos)
- 40 variables
- 4 variables cualitativas (dos de tipo texto)
- 36 variables cuantitativas discretas
- No hay valores faltantes
Home Team: Equipo local
Away Team: Equipo visitante
Score: Resultado (ejemplo 2-1)
Half Time Score: Resultado al descanso (ejemplo
1-1)
Match Excitement: Emoción del partido (subjetiva)
Home Team Rating: Nota del local (subjetiva)
Away Team Rating: Nota del visitante (subjetiva)
Home Team Possession: Posesión local
Away Team Possession: Posesión visitante
Home Team off Target Shots: Tiros fuera local
Home Team on Target Shots: Tiros a puerta local
Home Team Total Shots: Total tiros local
Home Team Blocked Shots: Tiros bloqueados local
Home Team Corners: Corners local
Home Team Throw Ins: Centros local
Home Team Pass Success: Pases exitosos local
Home Team Aerials Won: Balones aereos ganados
local
Home Team Clearances: Despejes local
Home Team Fouls: Faltas local
Home Team Yellow Cards: Amarillas local
Home Team Second Yellow Cards: Segundas amarillas
local
Home Team Red Cards: Rojas local
Away Team off Target Shots: Tiros fuera visitante
Away Team on Target Shots: Tiros a puerta
visitante
Away Team Total Shots: Total tiros visitante
Away Team Blocked Shots: Tiros bloqueados
visitante
Away Team Corners: Corners visitante
Away Team Throw Ins: Centros visitante
Away Team Pass Success: Pases exitosos visitante
Away Team Aerials Won: Balones aereos ganados
visitante
Away Team Clearances: Despejes visitante
Away Team Fouls: Faltas visitante
Away Team Yellow Cards: Amarillas visitante
Away Team Second Yellow Cards: Segundas amarillas
visitante
Away Team Red Cards: Rojas visitante
Home Team Goals Scored: Goles local
Away Team Goals Scored: Goles visitante
Home Team Goals Conceeded: Goles visitante
Away Team Goals Conceeded: Goles local
Year: Año
3 LIMPIEZA Y CREACIÓN
3.1 GENERACION DATOS FALTANTES
Debido a la ausencia de datos faltantes en nuestro dataset, por motivos unicamente teóricos, generamos de manera automática unos datos faltantes que posteriormeente limpiaremos.
Generación del dato faltante.
Resumen con datos faltantes.
3.2 LIMPIEZA DE DATOS
Limpieza de datos en columnas quitando los espacios y cambiandolos por guiones ya que los espacios dan bastantes problemas a la hora de llamar a las variables.
names(laliga) <- gsub(" ","_", names(laliga))Limpieza de variables que no nos interesa estudiar
laliga$Score <- NULL
laliga$`Half_Time_Score` <- NULL
laliga$`Match_Excitement` <- NULL
laliga$`Home_Team_Rating` <- NULL
laliga$`Away_Team_Rating` <- NULL
laliga$`Home_Team_Goals_Conceeded` <- NULL
laliga$`Away_Team_Goals_Conceeded` <- NULL
3.3 CREACIÓN DE NUEVAS VARIABLES
Creación de campos que interesa estudiar más adelante.
laliga <- mutate(laliga, score = ifelse(Home_Team_Goals_Scored-Away_Team_Goals_Scored > 0, "1",
ifelse(Home_Team_Goals_Scored-Away_Team_Goals_Scored < 0, "2", "x")))
laliga <- mutate(laliga, goals = Home_Team_Goals_Scored + Away_Team_Goals_Scored)
laliga <- mutate(laliga, home_points = case_when(score == 1 ~ 3,
score == "x" ~ 1,
score == 2 ~ 0))
laliga <- mutate(laliga, away_points = case_when(score == 1 ~ 0,
score == "x" ~ 1,
score == 2 ~ 3))
laliga <- mutate(laliga, jornada = ceiling(row_number() / 10)) %>%
mutate(jornada = (jornada - 1) %% 38 + 1)
Creación de campos que se quieren estudiar conforme avance el proyecto.
laliga <- mutate(laliga, total_off_target_shots = Home_Team_Off_Target_Shots + Away_Team_Off_Target_Shots)
laliga <- mutate(laliga, total_on_target_shots = Home_Team_On_Target_Shots + Away_Team_On_Target_Shots)
laliga <- mutate(laliga, total_shots = Home_Team_Total_Shots + Away_Team_Total_Shots)
laliga <- mutate(laliga, total_blocked_shots = Home_Team_Blocked_Shots + Away_Team_Blocked_Shots)
laliga <- mutate(laliga, total_corners = Home_Team_Corners + Away_Team_Corners)
laliga <- mutate(laliga, total_throw_ins = Home_Team_Throw_Ins + Away_Team_Throw_Ins)
laliga <- mutate(laliga, total_pass_success = `Home_Team_Pass_Success_%` + `Away_Team_Pass_Success_%`)
laliga <- mutate(laliga, total_aerials_won = Home_Team_Aerials_Won + Away_Team_Aerials_Won)
laliga <- mutate(laliga, total_clearances = Home_Team_Clearances + Away_Team_Clearances)
laliga <- mutate(laliga, total_fouls = Home_Team_Fouls + Away_Team_Fouls)
laliga <- mutate(laliga, total_yellow_cards = Home_Team_Yellow_Cards + Away_Team_Yellow_Cards)
laliga <- mutate(laliga, total_second_yellow_cards = Home_Team_Second_Yellow_Cards + Away_Team_Second_Yellow_Cards)
laliga <- mutate(laliga, total_red_cards = Home_Team_Red_Cards + Away_Team_Red_Cards)
3.4 CONVERSIÓN DE VARIABLES
Convertimos determinadas variables a categorías.
laliga$Home_Team <- as.factor(laliga$Home_Team)
laliga$Away_Team <- as.factor(laliga$Away_Team)
laliga$score <- factor(laliga$score, levels = c("1", "x", "2"))
3.5 DIVISIÓN TRAIN - TEST
Dividimos el dataset original en train y test. Decidimos que train contenga 6 de las 7 temporadas para utilizar los partidos de la 7ª (temp. 2020) en la fase de test.
test <- filter(laliga, year>2018)
train <- filter(laliga, year<=2018)
#Los csv generados tras la división train-test son los siguientes:
#write.csv(test,"test/test_laliga.csv")
#write.csv(train,"train/train_laliga.csv")
3.6 CREACIÓN DE DATASETS ÚTILES
Creación de dataset útiles para diversos análisis y comparativas. Dataframes separados por tipo de resultado “score”.
Victorias_casa <- train %>% filter(score==1)
Derrotas_casa <- train %>% filter(score==2)
Empates <- train %>% filter(score=="x")
3.7 RESUMEN FINAL DE VARIABLES
str(train)## tibble [1,900 × 52] (S3: tbl_df/tbl/data.frame)
## $ ...1 : num [1:1900] 0 1 2 3 4 5 6 7 8 9 ...
## $ Home_Team : Factor w/ 31 levels "ALAVÉS","ALMERÍA",..: 21 28 16 2 10 5 7 20 26 24 ...
## $ Away_Team : Factor w/ 31 levels "ALAVÉS","ALMERÍA",..: 3 29 9 12 27 11 13 31 8 4 ...
## $ Home_Team_Possession_% : num [1:1900] 40 47 53 56 41 72 59 53 63 59 ...
## $ Away_Team_Possession_% : num [1:1900] 60 53 47 44 59 28 41 47 37 41 ...
## $ Home_Team_Off_Target_Shots : num [1:1900] 5 4 6 7 5 5 4 4 3 5 ...
## $ Home_Team_On_Target_Shots : num [1:1900] 3 3 3 6 5 6 9 2 8 2 ...
## $ Home_Team_Total_Shots : num [1:1900] 12 12 10 19 12 12 20 9 14 8 ...
## $ Home_Team_Blocked_Shots : num [1:1900] 4 5 1 6 2 1 7 3 3 1 ...
## $ Home_Team_Corners : num [1:1900] 5 3 5 11 5 3 4 3 8 2 ...
## $ Home_Team_Throw_Ins : num [1:1900] 13 20 25 26 28 23 21 16 25 23 ...
## $ Home_Team_Pass_Success_% : num [1:1900] 69 76 79 81 60 93 82 80 88 79 ...
## $ Home_Team_Aerials_Won : num [1:1900] 11 13 20 19 29 2 27 19 23 21 ...
## $ Home_Team_Clearances : num [1:1900] 16 16 21 25 17 2 15 12 13 20 ...
## $ Home_Team_Fouls : num [1:1900] 13 23 13 8 13 11 19 11 9 13 ...
## $ Home_Team_Yellow_Cards : num [1:1900] 3 4 1 3 4 0 4 1 1 2 ...
## $ Home_Team_Second_Yellow_Cards: num [1:1900] 0 0 0 0 0 0 0 0 0 0 ...
## $ Home_Team_Red_Cards : num [1:1900] 2 0 0 0 0 1 0 0 0 0 ...
## $ Away_Team_Off_Target_Shots : num [1:1900] 5 5 1 6 7 3 8 5 6 3 ...
## $ Away_Team_On_Target_Shots : num [1:1900] 5 1 1 2 4 0 3 6 2 2 ...
## $ Away_Team_Total_Shots : num [1:1900] 12 11 8 12 19 3 12 12 8 9 ...
## $ Away_Team_Blocked_Shots : num [1:1900] 2 5 6 4 8 0 1 1 0 4 ...
## $ Away_Team_Corners : num [1:1900] 4 3 3 7 6 1 4 4 5 4 ...
## $ Away_Team_Throw_Ins : num [1:1900] 22 27 30 19 36 19 19 14 18 34 ...
## $ Away_Team_Pass_Success_% : num [1:1900] 84 79 76 70 75 81 74 78 79 68 ...
## $ Away_Team_Aerials_Won : num [1:1900] 17 14 10 11 25 4 22 21 15 26 ...
## $ Away_Team_Clearances : num [1:1900] 14 16 14 20 20 17 7 18 27 15 ...
## $ Away_Team_Fouls : num [1:1900] 9 8 26 9 14 13 15 14 13 17 ...
## $ Away_Team_Yellow_Cards : num [1:1900] 3 2 3 3 1 1 1 3 2 2 ...
## $ Away_Team_Second_Yellow_Cards: num [1:1900] 0 0 0 1 0 0 0 0 0 0 ...
## $ Away_Team_Red_Cards : num [1:1900] 0 1 0 0 0 0 0 0 0 0 ...
## $ Home_Team_Goals_Scored : num [1:1900] 1 1 2 1 1 3 3 0 2 0 ...
## $ Away_Team_Goals_Scored : num [1:1900] 0 1 1 1 0 0 1 2 0 0 ...
## $ year : num [1:1900] 2014 2014 2014 2014 2014 ...
## $ score : Factor w/ 3 levels "1","x","2": 1 2 1 2 1 1 1 3 1 2 ...
## $ goals : num [1:1900] 1 2 3 2 1 3 4 2 2 0 ...
## $ home_points : num [1:1900] 3 1 3 1 3 3 3 0 3 1 ...
## $ away_points : num [1:1900] 0 1 0 1 0 0 0 3 0 1 ...
## $ jornada : num [1:1900] 1 1 1 1 1 1 1 1 1 1 ...
## $ total_off_target_shots : num [1:1900] 10 9 7 13 12 8 12 9 9 8 ...
## $ total_on_target_shots : num [1:1900] 8 4 4 8 9 6 12 8 10 4 ...
## $ total_shots : num [1:1900] 24 23 18 31 31 15 32 21 22 17 ...
## $ total_blocked_shots : num [1:1900] 6 10 7 10 10 1 8 4 3 5 ...
## $ total_corners : num [1:1900] 9 6 8 18 11 4 8 7 13 6 ...
## $ total_throw_ins : num [1:1900] 35 47 55 45 64 42 40 30 43 57 ...
## $ total_pass_success : num [1:1900] 153 155 155 151 135 174 156 158 167 147 ...
## $ total_aerials_won : num [1:1900] 28 27 30 30 54 6 49 40 38 47 ...
## $ total_clearances : num [1:1900] 30 32 35 45 37 19 22 30 40 35 ...
## $ total_fouls : num [1:1900] 22 31 39 17 27 24 34 25 22 30 ...
## $ total_yellow_cards : num [1:1900] 6 6 4 6 5 1 5 4 3 4 ...
## $ total_second_yellow_cards : num [1:1900] 0 0 0 1 0 0 0 0 0 0 ...
## $ total_red_cards : num [1:1900] 2 1 0 0 0 1 0 0 0 0 ...
Las nuevas variables creadas son las siguientes:
- score: resultado 1 X 2
- goals: total goles del partido
- home_points: puntos del equipo local
- away_points: de tipo categórico
- jornada: nº de jornada liguera
- total_off_target_shots: total disparos NO a puerta
- total_on_target_shots: total disparos a puerta
- total_shots: total disparos
- total_blocked_shots: total disparos bloqueados
- total_corners: corners totales
- total_throw_ins: total centros al área
- total_pass_success: pases totales con éxito
- total_aerials_won: balones aéreos ganados totales
- total_clearances: despejes totales
- total_fouls: faltas totales
- total_yellow_cards: tarjetas amarillas totales
- total_second_yellow_cards: segundas tarjetas amarillas totales
- total_red_cards: tarjetas rojas totales
summary(train)## ...1 Home_Team Away_Team
## Min. : 0.0 ATHLETIC : 95 ATHLETIC : 95
## 1st Qu.: 474.8 ATLETICO MADRID: 95 ATLETICO MADRID: 95
## Median : 949.5 BARCELONA : 95 BARCELONA : 95
## Mean : 949.5 CELTA : 95 CELTA : 95
## 3rd Qu.:1424.2 EIBAR : 95 EIBAR : 95
## Max. :1899.0 ESPANYOL : 95 ESPANYOL : 95
## (Other) :1330 (Other) :1330
## Home_Team_Possession_% Away_Team_Possession_% Home_Team_Off_Target_Shots
## Min. :19.00 Min. :18.00 Min. : 0.000
## 1st Qu.:44.00 1st Qu.:41.00 1st Qu.: 4.000
## Median :52.00 Median :48.00 Median : 5.000
## Mean :51.74 Mean :48.26 Mean : 5.722
## 3rd Qu.:59.00 3rd Qu.:56.00 3rd Qu.: 7.000
## Max. :82.00 Max. :81.00 Max. :17.000
##
## Home_Team_On_Target_Shots Home_Team_Total_Shots Home_Team_Blocked_Shots
## Min. : 0.000 Min. : 2.00 Min. : 0.000
## 1st Qu.: 3.000 1st Qu.:10.00 1st Qu.: 2.000
## Median : 5.000 Median :13.00 Median : 3.000
## Mean : 4.841 Mean :13.53 Mean : 2.982
## 3rd Qu.: 6.000 3rd Qu.:16.00 3rd Qu.: 4.000
## Max. :15.000 Max. :33.00 Max. :12.000
##
## Home_Team_Corners Home_Team_Throw_Ins Home_Team_Pass_Success_%
## Min. : 0.000 Min. : 5.00 Min. :46.00
## 1st Qu.: 4.000 1st Qu.:18.00 1st Qu.:73.00
## Median : 5.000 Median :23.00 Median :78.00
## Mean : 5.658 Mean :22.84 Mean :77.68
## 3rd Qu.: 7.000 3rd Qu.:27.00 3rd Qu.:83.00
## Max. :20.000 Max. :47.00 Max. :93.00
##
## Home_Team_Aerials_Won Home_Team_Clearances Home_Team_Fouls
## Min. : 2.00 Min. : 1.00 Min. : 1.00
## 1st Qu.:11.00 1st Qu.:12.00 1st Qu.:11.00
## Median :16.00 Median :17.00 Median :14.00
## Mean :16.62 Mean :18.43 Mean :13.85
## 3rd Qu.:21.00 3rd Qu.:23.00 3rd Qu.:17.00
## Max. :46.00 Max. :61.00 Max. :33.00
##
## Home_Team_Yellow_Cards Home_Team_Second_Yellow_Cards Home_Team_Red_Cards
## Min. :0.000 Min. :0.00 Min. :0.00000
## 1st Qu.:1.000 1st Qu.:0.00 1st Qu.:0.00000
## Median :2.000 Median :0.00 Median :0.00000
## Mean :2.461 Mean :0.06 Mean :0.04421
## 3rd Qu.:3.000 3rd Qu.:0.00 3rd Qu.:0.00000
## Max. :8.000 Max. :2.00 Max. :2.00000
##
## Away_Team_Off_Target_Shots Away_Team_On_Target_Shots Away_Team_Total_Shots
## Min. : 0.000 Min. : 0.000 Min. : 0.00
## 1st Qu.: 3.000 1st Qu.: 2.000 1st Qu.: 7.00
## Median : 4.000 Median : 3.000 Median :10.00
## Mean : 4.353 Mean : 3.748 Mean :10.49
## 3rd Qu.: 6.000 3rd Qu.: 5.000 3rd Qu.:13.00
## Max. :14.000 Max. :13.000 Max. :28.00
##
## Away_Team_Blocked_Shots Away_Team_Corners Away_Team_Throw_Ins
## Min. : 0.000 Min. : 0.000 Min. : 3.00
## 1st Qu.: 1.000 1st Qu.: 2.000 1st Qu.:17.00
## Median : 2.000 Median : 4.000 Median :21.00
## Mean : 2.411 Mean : 4.203 Mean :21.62
## 3rd Qu.: 3.000 3rd Qu.: 6.000 3rd Qu.:26.00
## Max. :11.000 Max. :32.000 Max. :45.00
##
## Away_Team_Pass_Success_% Away_Team_Aerials_Won Away_Team_Clearances
## Min. :41.00 Min. : 0.00 Min. : 2.00
## 1st Qu.:71.00 1st Qu.:11.00 1st Qu.:16.00
## Median :77.00 Median :15.00 Median :22.00
## Mean :75.74 Mean :16.16 Mean :22.93
## 3rd Qu.:81.00 3rd Qu.:21.00 3rd Qu.:29.00
## Max. :93.00 Max. :47.00 Max. :63.00
##
## Away_Team_Fouls Away_Team_Yellow_Cards Away_Team_Second_Yellow_Cards
## Min. : 0.00 Min. :0.000 Min. :0.00000
## 1st Qu.:11.00 1st Qu.:2.000 1st Qu.:0.00000
## Median :14.00 Median :3.000 Median :0.00000
## Mean :13.88 Mean :2.744 Mean :0.08368
## 3rd Qu.:17.00 3rd Qu.:4.000 3rd Qu.:0.00000
## Max. :29.00 Max. :8.000 Max. :2.00000
##
## Away_Team_Red_Cards Home_Team_Goals_Scored Away_Team_Goals_Scored
## Min. :0.00000 Min. : 0.000 Min. :0.000
## 1st Qu.:0.00000 1st Qu.: 1.000 1st Qu.:0.000
## Median :0.00000 Median : 1.000 Median :1.000
## Mean :0.04789 Mean : 1.564 Mean :1.161
## 3rd Qu.:0.00000 3rd Qu.: 2.000 3rd Qu.:2.000
## Max. :2.00000 Max. :10.000 Max. :8.000
##
## year score goals home_points away_points
## Min. :2014 1:882 Min. : 0.000 Min. :0.000 Min. :0.000
## 1st Qu.:2015 x:468 1st Qu.: 1.000 1st Qu.:0.000 1st Qu.:0.000
## Median :2016 2:550 Median : 3.000 Median :1.000 Median :1.000
## Mean :2016 Mean : 2.725 Mean :1.639 Mean :1.115
## 3rd Qu.:2017 3rd Qu.: 4.000 3rd Qu.:3.000 3rd Qu.:3.000
## Max. :2018 Max. :12.000 Max. :3.000 Max. :3.000
##
## jornada total_off_target_shots total_on_target_shots total_shots
## Min. : 1.0 Min. : 1.00 Min. : 1.000 Min. : 5.00
## 1st Qu.:10.0 1st Qu.: 8.00 1st Qu.: 6.000 1st Qu.:20.00
## Median :19.5 Median :10.00 Median : 8.000 Median :24.00
## Mean :19.5 Mean :10.07 Mean : 8.589 Mean :24.03
## 3rd Qu.:29.0 3rd Qu.:12.00 3rd Qu.:11.000 3rd Qu.:28.00
## Max. :38.0 Max. :22.00 Max. :23.000 Max. :46.00
##
## total_blocked_shots total_corners total_throw_ins total_pass_success
## Min. : 0.000 Min. : 1.000 Min. :16.00 Min. :100.0
## 1st Qu.: 4.000 1st Qu.: 8.000 1st Qu.:37.00 1st Qu.:146.0
## Median : 5.000 Median :10.000 Median :44.00 Median :154.0
## Mean : 5.392 Mean : 9.861 Mean :44.46 Mean :153.4
## 3rd Qu.: 7.000 3rd Qu.:12.000 3rd Qu.:51.00 3rd Qu.:162.0
## Max. :15.000 Max. :42.000 Max. :86.00 Max. :183.0
##
## total_aerials_won total_clearances total_fouls total_yellow_cards
## Min. : 4.00 Min. : 15.00 Min. : 8.00 Min. : 0.000
## 1st Qu.:24.00 1st Qu.: 33.00 1st Qu.:24.00 1st Qu.: 4.000
## Median :31.00 Median : 40.00 Median :28.00 Median : 5.000
## Mean :32.77 Mean : 41.36 Mean :27.72 Mean : 5.205
## 3rd Qu.:41.00 3rd Qu.: 48.00 3rd Qu.:32.00 3rd Qu.: 7.000
## Max. :86.00 Max. :102.00 Max. :52.00 Max. :13.000
##
## total_second_yellow_cards total_red_cards
## Min. :0.0000 Min. :0.00000
## 1st Qu.:0.0000 1st Qu.:0.00000
## Median :0.0000 Median :0.00000
## Mean :0.1437 Mean :0.09211
## 3rd Qu.:0.0000 3rd Qu.:0.00000
## Max. :2.0000 Max. :3.00000
##
4 ANÁLISIS EXPLORATORIO DE DATOS (EDA)
4.1 VARIABLES CUALITATIVAS
Las variables cualitativas de este data set son las siguientes:
- Home Team: Equipo local
- Away Team: Equipo visitante
- Score: Resultado 2-1 (eliminado en la fase de limpiado)
- Half Time Score: Resultado al descanso 1-1 (eliminado en la fase de limpiado)
- score: Resultado 1 X 2
4.1.1 RESUMEN NUMERICO
Exploramos los partidos que ha jugado cada equipo, nustra pretensión es comprobar que equipos han estado más años en primera división.
matches <- as.data.frame(table(train$Home_Team) + table(train$Away_Team)) %>% arrange(desc(Freq))
kable(matches, "pipe", align = "ll")| Var1 | Freq |
|---|---|
| ATHLETIC | 190 |
| ATLETICO MADRID | 190 |
| BARCELONA | 190 |
| CELTA | 190 |
| EIBAR | 190 |
| ESPANYOL | 190 |
| REAL MADRID | 190 |
| REAL SOCIEDAD | 190 |
| SEVILLA FC | 190 |
| VALENCIA | 190 |
| VILLARREAL | 190 |
| DEPORTIVO | 152 |
| GETAFE | 152 |
| LEVANTE | 152 |
| MÁLAGA | 152 |
| REAL BETIS | 152 |
| ALAVÉS | 114 |
| GRANADA | 114 |
| LAS PALMAS | 114 |
| LEGANÉS | 114 |
| RAYO VALLECANO | 114 |
| GIJÓN | 76 |
| GIRONA | 76 |
| ALMERÍA | 38 |
| CÓRDOBA | 38 |
| ELCHE | 38 |
| HUESCA | 38 |
| OSASUNA | 38 |
| VALLADOLID | 38 |
| CÁDIZ CF | 0 |
| MALLORCA | 0 |
Número y proporción de victorias, derrotas y empates.
kable(table(train$score), align = "ll")| Var1 | Freq |
|---|---|
| 1 | 882 |
| x | 468 |
| 2 | 550 |
kable(prop.table(table(train$score))*100, align = "ll")| Var1 | Freq |
|---|---|
| 1 | 46.42105 |
| x | 24.63158 |
| 2 | 28.94737 |
Aquí observamos cuantos partidos han ganado, empatado y perdido cada equipo. Primero como equipo local y después como equipo visitante.
kable(with(train, table(Home_Team, score)),align = "llll")| 1 | x | 2 | |
|---|---|---|---|
| ALAVÉS | 23 | 17 | 17 |
| ALMERÍA | 3 | 7 | 9 |
| ATHLETIC | 47 | 30 | 18 |
| ATLETICO MADRID | 70 | 17 | 8 |
| BARCELONA | 78 | 11 | 6 |
| CÁDIZ CF | 0 | 0 | 0 |
| CELTA | 42 | 26 | 27 |
| CÓRDOBA | 1 | 6 | 12 |
| DEPORTIVO | 20 | 25 | 31 |
| EIBAR | 40 | 21 | 34 |
| ELCHE | 6 | 3 | 10 |
| ESPANYOL | 44 | 25 | 26 |
| GETAFE | 32 | 19 | 25 |
| GIJÓN | 12 | 8 | 18 |
| GIRONA | 11 | 9 | 18 |
| GRANADA | 14 | 19 | 24 |
| HUESCA | 5 | 6 | 8 |
| LAS PALMAS | 21 | 13 | 23 |
| LEGANÉS | 21 | 18 | 18 |
| LEVANTE | 26 | 24 | 26 |
| MÁLAGA | 30 | 17 | 29 |
| MALLORCA | 0 | 0 | 0 |
| OSASUNA | 2 | 7 | 10 |
| RAYO VALLECANO | 21 | 12 | 24 |
| REAL BETIS | 30 | 22 | 24 |
| REAL MADRID | 71 | 12 | 12 |
| REAL SOCIEDAD | 43 | 24 | 28 |
| SEVILLA FC | 64 | 18 | 13 |
| VALENCIA | 49 | 27 | 19 |
| VALLADOLID | 5 | 5 | 9 |
| VILLARREAL | 51 | 20 | 24 |
kable(with(train, table(Away_Team, score)),align = "llll")| 1 | x | 2 | |
|---|---|---|---|
| ALAVÉS | 29 | 9 | 19 |
| ALMERÍA | 13 | 1 | 5 |
| ATHLETIC | 46 | 21 | 28 |
| ATLETICO MADRID | 21 | 25 | 49 |
| BARCELONA | 11 | 21 | 63 |
| CÁDIZ CF | 0 | 0 | 0 |
| CELTA | 49 | 22 | 24 |
| CÓRDOBA | 12 | 5 | 2 |
| DEPORTIVO | 37 | 30 | 9 |
| EIBAR | 46 | 29 | 20 |
| ELCHE | 9 | 5 | 5 |
| ESPANYOL | 46 | 27 | 22 |
| GETAFE | 38 | 21 | 17 |
| GIJÓN | 22 | 11 | 5 |
| GIRONA | 16 | 10 | 12 |
| GRANADA | 38 | 12 | 7 |
| HUESCA | 11 | 6 | 2 |
| LAS PALMAS | 40 | 11 | 6 |
| LEGANÉS | 35 | 12 | 10 |
| LEVANTE | 45 | 18 | 13 |
| MÁLAGA | 45 | 18 | 13 |
| MALLORCA | 0 | 0 | 0 |
| OSASUNA | 14 | 3 | 2 |
| RAYO VALLECANO | 35 | 11 | 11 |
| REAL BETIS | 40 | 13 | 23 |
| REAL MADRID | 19 | 17 | 59 |
| REAL SOCIEDAD | 45 | 23 | 27 |
| SEVILLA FC | 44 | 23 | 28 |
| VALENCIA | 36 | 25 | 34 |
| VALLADOLID | 8 | 6 | 5 |
| VILLARREAL | 32 | 33 | 30 |
Lo representamos mediante porcentajes % de victorias, derrotas y empates de cada equipo. Primero como equipo local y después como equipo visitante.
kable(round(t((prop.table(with(train, table(score, Home_Team)), margin = 2)))*100,2), align = "llll")| 1 | x | 2 | |
|---|---|---|---|
| ALAVÉS | 40.35 | 29.82 | 29.82 |
| ALMERÍA | 15.79 | 36.84 | 47.37 |
| ATHLETIC | 49.47 | 31.58 | 18.95 |
| ATLETICO MADRID | 73.68 | 17.89 | 8.42 |
| BARCELONA | 82.11 | 11.58 | 6.32 |
| CÁDIZ CF | NaN | NaN | NaN |
| CELTA | 44.21 | 27.37 | 28.42 |
| CÓRDOBA | 5.26 | 31.58 | 63.16 |
| DEPORTIVO | 26.32 | 32.89 | 40.79 |
| EIBAR | 42.11 | 22.11 | 35.79 |
| ELCHE | 31.58 | 15.79 | 52.63 |
| ESPANYOL | 46.32 | 26.32 | 27.37 |
| GETAFE | 42.11 | 25.00 | 32.89 |
| GIJÓN | 31.58 | 21.05 | 47.37 |
| GIRONA | 28.95 | 23.68 | 47.37 |
| GRANADA | 24.56 | 33.33 | 42.11 |
| HUESCA | 26.32 | 31.58 | 42.11 |
| LAS PALMAS | 36.84 | 22.81 | 40.35 |
| LEGANÉS | 36.84 | 31.58 | 31.58 |
| LEVANTE | 34.21 | 31.58 | 34.21 |
| MÁLAGA | 39.47 | 22.37 | 38.16 |
| MALLORCA | NaN | NaN | NaN |
| OSASUNA | 10.53 | 36.84 | 52.63 |
| RAYO VALLECANO | 36.84 | 21.05 | 42.11 |
| REAL BETIS | 39.47 | 28.95 | 31.58 |
| REAL MADRID | 74.74 | 12.63 | 12.63 |
| REAL SOCIEDAD | 45.26 | 25.26 | 29.47 |
| SEVILLA FC | 67.37 | 18.95 | 13.68 |
| VALENCIA | 51.58 | 28.42 | 20.00 |
| VALLADOLID | 26.32 | 26.32 | 47.37 |
| VILLARREAL | 53.68 | 21.05 | 25.26 |
kable(round(t((prop.table(with(train, table(score, Away_Team)), margin = 2)))*100,2), align = "llll")| 1 | x | 2 | |
|---|---|---|---|
| ALAVÉS | 50.88 | 15.79 | 33.33 |
| ALMERÍA | 68.42 | 5.26 | 26.32 |
| ATHLETIC | 48.42 | 22.11 | 29.47 |
| ATLETICO MADRID | 22.11 | 26.32 | 51.58 |
| BARCELONA | 11.58 | 22.11 | 66.32 |
| CÁDIZ CF | NaN | NaN | NaN |
| CELTA | 51.58 | 23.16 | 25.26 |
| CÓRDOBA | 63.16 | 26.32 | 10.53 |
| DEPORTIVO | 48.68 | 39.47 | 11.84 |
| EIBAR | 48.42 | 30.53 | 21.05 |
| ELCHE | 47.37 | 26.32 | 26.32 |
| ESPANYOL | 48.42 | 28.42 | 23.16 |
| GETAFE | 50.00 | 27.63 | 22.37 |
| GIJÓN | 57.89 | 28.95 | 13.16 |
| GIRONA | 42.11 | 26.32 | 31.58 |
| GRANADA | 66.67 | 21.05 | 12.28 |
| HUESCA | 57.89 | 31.58 | 10.53 |
| LAS PALMAS | 70.18 | 19.30 | 10.53 |
| LEGANÉS | 61.40 | 21.05 | 17.54 |
| LEVANTE | 59.21 | 23.68 | 17.11 |
| MÁLAGA | 59.21 | 23.68 | 17.11 |
| MALLORCA | NaN | NaN | NaN |
| OSASUNA | 73.68 | 15.79 | 10.53 |
| RAYO VALLECANO | 61.40 | 19.30 | 19.30 |
| REAL BETIS | 52.63 | 17.11 | 30.26 |
| REAL MADRID | 20.00 | 17.89 | 62.11 |
| REAL SOCIEDAD | 47.37 | 24.21 | 28.42 |
| SEVILLA FC | 46.32 | 24.21 | 29.47 |
| VALENCIA | 37.89 | 26.32 | 35.79 |
| VALLADOLID | 42.11 | 31.58 | 26.32 |
| VILLARREAL | 33.68 | 34.74 | 31.58 |
4.1.2 VISUALIZACION VARIABLES CUALITATIVAS
Se puede apreciar que jugar en casa es un factor importante para ganar (aproximadamente la mitad de partidos los gana el de casa).
ggplot(train, aes(score, fill = score)) + geom_bar() + scale_fill_manual(values = c("limegreen", "lightblue", "indianred")) + labs(x = "Resultado", y = "Nº de resultados", title = "Nº de victorias Local / Visitante / Empate") + theme(plot.title = element_text(hjust = 0.5))
Aproximadamente el 46% de los equipos que juegan en casa ganan.
a <- train %>% group_by(score) %>% count(score)
b <- round(as.double(prop.table(table(train$score))*100,2), digits = 2)
datos <- a$n
pie3D(datos, col = c("limegreen", "lightblue", "indianred"), labels = b, explode = 0.05)
A continuación representamos mediante gráficos de barras la cantidad de partidos que juega cada equipo como local y como visitante en las 6 temporadas sometidas a estudio. Se puede apreciar claramente como hay un grupo de equipos que han jugado todos los partidos y por lo tanto nunca han descendido de categoría. Estos son: ATHLETIC, ATLETICO MADRID, BARCELONA, CELTA, EIBAR, ESPANYOL, REAL MADRID, REAL SOCIEDAD, SEVILLA FC, VALENCIA y VILLARREAL.
ggplot(train, aes(Home_Team, color = Home_Team, fill = Home_Team)) + geom_bar() + coord_flip() + labs(x = "Equipo", y = "Nº de partidos", title = "Nº de partidos como Local")+ theme(plot.title = element_text(hjust = 0.5))
ggplot(train, aes(Away_Team, color = Away_Team, fill = Away_Team)) + geom_bar() + coord_flip() + labs(x = "Equipo", y = "Nº de partidos", title = "Nº de partidos como Visitante")+ theme(plot.title = element_text(hjust = 0.5))
En este otro gráfico se pretende representar, por equipo, el número de victorias, derrotas y empates cuando se juega como local y cuando se juega como visitante. se puede apreciar como hay equipos que destacan en victorias jugando como local, ATLETICO MADRID, BARCELONA, REAL MADRID, SEVILLA FC. Además ATLETICO MADRID, BARCELONA, REAL MADRID también lo hacen como visitantes.
En cambio HUESCA, ELCHE, CORDOBA, MALLORCA y ALMERIA destacan justo por lo contrario, tiene un escaso número de victorias como equipo local y como visitante.
ggplot(train, aes(x = Home_Team, color = score, fill = score)) + geom_bar() + facet_wrap(~score) + coord_flip() + labs(x = "Equipo", y = "1 X 2", title = "Nº de Victorias - Empates - Derrotas como EQ. LOCAL")+ theme(plot.title = element_text(hjust = 0.5))
ggplot(train, aes(x = Away_Team, color = score, fill = score)) + geom_bar() + facet_wrap(~score) + coord_flip() + labs(x = "Equipo", y = "1 X 2", title = "Nº de Victorias - Empates - Derrotas como EQ. VISITANTE")+ theme(plot.title = element_text(hjust = 0.5))
4.2 VARIABLES CUANTITATIVAS
4.2.1 RESUMEN NUMERICO
POSESIÓN
summary(train$`Home_Team_Possession_%`)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 19.00 44.00 52.00 51.74 59.00 82.00summary(train$`Away_Team_Possession_%`)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 18.00 41.00 48.00 48.26 56.00 81.00
TIROS
No puerta
summary(train$Home_Team_Off_Target_Shots)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 4.000 5.000 5.722 7.000 17.000summary(train$Away_Team_Off_Target_Shots)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 3.000 4.000 4.353 6.000 14.000summary(train$total_off_target_shots)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 1.00 8.00 10.00 10.07 12.00 22.00
A puerta
summary(train$Home_Team_On_Target_Shots)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 3.000 5.000 4.841 6.000 15.000summary(train$Away_Team_On_Target_Shots)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 2.000 3.000 3.748 5.000 13.000summary(train$total_on_target_shots)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 1.000 6.000 8.000 8.589 11.000 23.000
Total
summary(train$Home_Team_Total_Shots)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 2.00 10.00 13.00 13.53 16.00 33.00summary(train$Away_Team_Total_Shots)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.00 7.00 10.00 10.49 13.00 28.00summary(train$total_shots)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 5.00 20.00 24.00 24.03 28.00 46.00
BLOQUEOS
summary(train$Home_Team_Blocked_Shots)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 2.000 3.000 2.982 4.000 12.000summary(train$Away_Team_Blocked_Shots)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 1.000 2.000 2.411 3.000 11.000summary(train$total_blocked_shots)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 4.000 5.000 5.392 7.000 15.000
CORNERS
summary(train$Home_Team_Corners)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 4.000 5.000 5.658 7.000 20.000summary(train$Away_Team_Corners)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 2.000 4.000 4.203 6.000 32.000summary(train$total_corners)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 1.000 8.000 10.000 9.861 12.000 42.000
CENTROS
summary(train$Home_Team_Throw_Ins)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 5.00 18.00 23.00 22.84 27.00 47.00summary(train$Away_Team_Throw_Ins)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 3.00 17.00 21.00 21.62 26.00 45.00summary(train$total_throw_ins)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 16.00 37.00 44.00 44.46 51.00 86.00
PASES
summary(train$`Home_Team_Pass_Success_%`)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 46.00 73.00 78.00 77.68 83.00 93.00summary(train$`Away_Team_Pass_Success_%`)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 41.00 71.00 77.00 75.74 81.00 93.00summary(train$total_pass_success)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 100.0 146.0 154.0 153.4 162.0 183.0
BALONES AEREOS
summary(train$Home_Team_Aerials_Won)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 2.00 11.00 16.00 16.62 21.00 46.00summary(train$Away_Team_Aerials_Won)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.00 11.00 15.00 16.16 21.00 47.00summary(train$total_aerials_won)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 4.00 24.00 31.00 32.77 41.00 86.00
DESPEJES
summary(train$Home_Team_Clearances)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 1.00 12.00 17.00 18.43 23.00 61.00summary(train$Away_Team_Clearances)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 2.00 16.00 22.00 22.93 29.00 63.00summary(train$total_clearances)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 15.00 33.00 40.00 41.36 48.00 102.00
FALTAS
summary(train$Home_Team_Fouls)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 1.00 11.00 14.00 13.85 17.00 33.00summary(train$Away_Team_Fouls)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.00 11.00 14.00 13.88 17.00 29.00summary(train$total_fouls)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 8.00 24.00 28.00 27.72 32.00 52.00
TARJETAS AMARILLAS
summary(train$Home_Team_Yellow_Cards)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 1.000 2.000 2.461 3.000 8.000summary(train$Away_Team_Yellow_Cards)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 2.000 3.000 2.744 4.000 8.000summary(train$total_yellow_cards)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 4.000 5.000 5.205 7.000 13.000
SEGUNDAS TARJETAS AMARILLAS
summary(train$Home_Team_Second_Yellow_Cards)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.00 0.00 0.00 0.06 0.00 2.00summary(train$Away_Team_Second_Yellow_Cards)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.00000 0.00000 0.00000 0.08368 0.00000 2.00000summary(train$total_second_yellow_cards)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.0000 0.0000 0.0000 0.1437 0.0000 2.0000
TARJETAS ROJAS
summary(train$Home_Team_Red_Cards)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.00000 0.00000 0.00000 0.04421 0.00000 2.00000summary(train$Away_Team_Red_Cards)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.00000 0.00000 0.00000 0.04789 0.00000 2.00000summary(train$total_red_cards)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.00000 0.00000 0.00000 0.09211 0.00000 3.00000
GOLES
summary(train$Home_Team_Goals_Scored)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 1.000 1.000 1.564 2.000 10.000summary(train$Away_Team_Goals_Scored)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 0.000 1.000 1.161 2.000 8.000summary(train$goals)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.000 1.000 3.000 2.725 4.000 12.000
4.2.2 VISUALIZACION VARIABLES CUANTITATIVAS
POSESIÓN
Histograma con curva de densidad sobre la posesión del equipo local.
ggplot(train, aes(`Home_Team_Possession_%`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'orange') + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica % Posesión EQ. LOCAL", x="% de Posesión", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Porcentaje de posesión del equipo local respecto al resultado 1 X 2.
ggplot(train,aes(score ,`Home_Team_Possession_%`)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'orange') + labs(title="Gráfica Pep", x="resultado", y="posesión local") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre la posesión del equipo visitante
ggplot(train, aes(`Away_Team_Possession_%`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'orange') + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica % Posesión EQ. VISITANTE", x="% de Posesión", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Porcentaje de posesión del equipo visitante respecto al resultado 1 X 2.
ggplot(train,aes(score ,`Away_Team_Possession_%`)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'orange') + labs(title="Gráfica Pep", x="resultado", y="posesión visitante") + theme(plot.title=element_text(hjust = 0.5))
TIROS
TOTALES
Histograma con curva de densidad sobre el total de tiros por partido.
ggplot(train, aes(`total_shots`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'pink') + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica tiros totales por partido", x="tiros", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Porcentaje de tiros totales respecto al resultado 1 X 2. En los partidos el número total de disparos está bastante igualado con independencia de la victoria, derrota o empate.
ggplot(train,aes(score , total_shots)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'pink') + labs(title="Media de disparos por partido", x="resultado", y="disparos") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de tiros del equipo local por partido.
ggplot(train, aes(`Home_Team_Total_Shots`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'pink') + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica tiros totales por partido EQ. LOCAL", x="tiros", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Porcentaje de tiros totales del equipo local respecto al resultado 1 X 2. El número de tiros no influye mucho en el resultado (gane, pierda o empate suelen ser similares)
ggplot(train,aes(score ,Home_Team_Total_Shots)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'pink') + labs(title="media de tiros EQ. LOCAL por partido", x="resultado", y="tiros local") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de tiros del equipo visitante por partido.
ggplot(train, aes(`Away_Team_Total_Shots`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'pink') + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica tiros totales por partido EQ. VISITANTE", x="tiros", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Porcentaje de tiros totales del equipo local respecto al resultado 1 X 2. El número de tiros no influye mucho en el resultado (gane, pierda o empate suelen ser similares)
ggplot(train,aes(score ,Away_Team_Total_Shots)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'pink') + labs(title="media de tiros EQ. VISITANTE por partido", x="resultado", y="tiros local") + theme(plot.title=element_text(hjust = 0.5))
A PUERTA
Histograma con curva de densidad sobre el total de tiros por partido.
ggplot(train, aes(`total_on_target_shots`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'pink') + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica tiros totales a puerta por partido", x="tiros a puerta", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Porcentaje de tiros totales a puerta respecto al resultado 1 X 2.
ggplot(train,aes(score , total_on_target_shots)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'pink') + labs(title="Media de disparos a puerta por partido", x="resultado", y="disparos a puerta") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de tiros del equipo local por partido.
ggplot(train, aes(`Home_Team_On_Target_Shots`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'pink') + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica tiros totales a puerta por partido EQ. LOCAL", x="tiros", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Porcentaje de tiros totales del equipo local respecto al resultado 1 X 2.
ggplot(train,aes(score ,`Home_Team_On_Target_Shots`)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'pink') + labs(title="media de tiros EQ. LOCAL por partido", x="resultado", y="tiros local a puerta") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de tiros del equipo visitante por partido.
ggplot(train, aes(`Away_Team_On_Target_Shots`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'pink') + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica tiros totales a puerta por partido EQ. VISITANTE", x="tiros", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Porcentaje de tiros totales del equipo local respecto al resultado 1 X 2. El número de tiros no influye mucho en el resultado (gane, pierda o empate suelen ser similares)
ggplot(train,aes(score ,`Away_Team_On_Target_Shots`)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'pink') + labs(title="media de tiros EQ. VISITANTE por partido", x="resultado", y="tiros local") + theme(plot.title=element_text(hjust = 0.5))
Por motivos de simplicidad en el análisis NO hacemos el mismo ejercicio para los tiros que no van a puerta.
BLOQUEOS
Histograma con curva de densidad sobre el total de tiros bloqueados por partido.
ggplot(train, aes(`total_blocked_shots`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'grey') + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica tiros bloqueados totales", x="tiros bloqueados", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Bloqueos totales respecto al resultado 1 X 2.
ggplot(train,aes(score ,total_blocked_shots)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = "grey") + labs(title="Media de tiros bloqueados por partido", x="resultado", y="tiros bloqueados") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de tiros bloqueados por partido del equipo local.
ggplot(train, aes(`Home_Team_Blocked_Shots`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'grey') + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica tiros bloqueados totales EQ. LOCAL", x="tiros bloqueados eq. local", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de tiros bloqueados por partido del equipo visitante.
ggplot(train, aes(`Away_Team_Blocked_Shots`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'grey') + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica tiros bloqueados totales EQ. VISITANTE", x="tiros bloqueados eq. visitante", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
CORNERS
Histograma con curva de densidad sobre el total de corners por partido.
ggplot(train, aes(`total_corners`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'blue') + geom_density(alpha=.3, fill = "yellow") + labs(title="Gráfica corners totales", x="corners", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Corners totales respecto al resultado 1 X 2. El numero de corners no parece un factor determinante en la victoria se puede observar como con independencia del ganadar el numero de corners está muy repartido
ggplot(train,aes(score ,total_corners)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'blue') + labs(title="Media de corners por partido", x="resultado", y="corners") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de corners por partido del equipo local.
ggplot(train, aes(`Home_Team_Corners`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'blue') + geom_density(alpha=.3, fill = "yellow") + labs(title="Gráfica corners totales EQ. LOCAL", x="tiros bloqueados eq. local", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de corners por partido del equipo visitante.
ggplot(train, aes(`Away_Team_Corners`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'blue') + geom_density(alpha=.3, fill = "yellow") + labs(title="Gráfica corners totales EQ. VISITANTE", x="tiros bloqueados eq. visitante", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
CENTROS
Histograma con curva de densidad sobre el total de centros por partido.
ggplot(train, aes(`total_throw_ins`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'lightblue') + geom_density(alpha=.3, fill = "yellow") + labs(title="Gráfica centros totales", x="centros", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Centros totales respecto al resultado 1 X 2. El numero de centros no parece un factor determinante en la victoria se puede observar como con independencia del ganadar el numero de centros está muy repartido.
ggplot(train,aes(score ,total_throw_ins)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'lightblue') + labs(title="Media de centros por partido", x="resultado", y="centros") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de centros por partido del equipo local.
ggplot(train, aes(`Home_Team_Throw_Ins`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'lightblue') + geom_density(alpha=.3, fill = "yellow") + labs(title="Gráfica centros totales EQ. LOCAL", x="centros eq. local", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de centros por partido del equipo visitante.
ggplot(train, aes(`Away_Team_Throw_Ins`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = 'lightblue') + geom_density(alpha=.3, fill = "yellow") + labs(title="Gráfica centros totales EQ. VISITANTE", x="centros eq. visitante", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
PASES
Histograma con curva de densidad sobre el total de pases exitosos por partido.
ggplot(train, aes(`total_pass_success`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "white") + geom_density(alpha=.3, fill = "yellow") + labs(title="Gráfica pases exitosos totales", x="pases exitosos", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Pases totales respecto al resultado 1 X 2. El numero de centros no parece un factor determinante en la victoria se puede observar como con independencia del ganadar el numero de centros está muy repartido.
ggplot(train,aes(score ,`total_pass_success`)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = "white") + labs(title="Media de pases exitosos por partido", x="resultado", y="pases exitosos") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de centros por partido del equipo local.
ggplot(train, aes(`Home_Team_Pass_Success_%`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "white") + geom_density(alpha=.3, fill = "yellow") + labs(title="Gráfica pases exitosos totales EQ. LOCAL", x="pases exitosos eq. local", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de centros por partido del equipo visitante.
ggplot(train, aes(`Away_Team_Pass_Success_%`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "white") + geom_density(alpha=.3, fill = "yellow") + labs(title="Gráfica pases exitosos totales EQ. VISITANTE", x="pases exitosos eq. visitante", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
BALONES AEREOS
Histograma con curva de densidad sobre el total de balones aéreos ganadoss por partido.
ggplot(train, aes(`total_aerials_won`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "brown") + geom_density(alpha=.3, fill = "yellow") + labs(title="Gráfica balones aéreos ganados totales", x="balones aéreos ganados", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Balones aéreos ganados totales respecto al resultado 1 X 2. El número de duelos aereos no parece un factor determinante en la victoria.
ggplot(train,aes(score ,total_aerials_won)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = "brown") + labs(title="Media de balones aéreos ganados por partido", x="resultado", y="duelos aereos") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de centros por partido del equipo local.
ggplot(train, aes(`Home_Team_Aerials_Won`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "brown") + geom_density(alpha=.3, fill = "yellow") + labs(title="Gráfica balones aéreos ganados totales EQ. LOCAL", x="pases exitosos eq. local", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de centros por partido del equipo visitante.
ggplot(train, aes(`Away_Team_Aerials_Won`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "brown") + geom_density(alpha=.3, fill = "yellow") + labs(title="Gráfica balones aéreos ganados totales EQ. VISITANTE", x="pases exitosos eq. visitante", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
DESPEJES
Histograma con curva de densidad sobre el total de despejes por partido.
ggplot(train, aes(`total_clearances`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "lightgreen") + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica despejes totales", x="despejes", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Despejes totales respecto al resultado 1 X 2. El número de despejes no parece un factor determinante en la victoria incluso parece que a mayor número de despejes medios el partido parece más probable que acabe en empate
ggplot(train,aes(score ,total_clearances)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'lightgreen') + labs(title="Media de despejes por partido", x="resultado", y="despejes") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de despejes del equipo local.
ggplot(train, aes(`Home_Team_Clearances`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "lightgreen") + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica despejes totales EQ. LOCAL", x="despejes eq. local", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de despejes del equipo visitante.
ggplot(train, aes(`Away_Team_Clearances`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "lightgreen") + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica despejes totales EQ. VISITANTE", x="despejes eq. visitante", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
FALTAS
Histograma con curva de densidad sobre el total de faltas por partido.
ggplot(train, aes(`total_fouls`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "lightyellow") + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica faltas totales", x="faltas", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Faltas totales respecto al resultado 1 X 2. El número de faltas no parece un factor determinante.
ggplot(train,aes(score ,total_fouls)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'lightyellow') + labs(title="Media de faltas por partido", x="resultado", y="faltas") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de faltas del equipo local.
ggplot(train, aes(`Home_Team_Fouls`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "lightyellow") + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica faltas totales EQ. LOCAL", x="faltas eq. local", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total faltas del equipo visitante.
ggplot(train, aes(`Away_Team_Fouls`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "lightyellow") + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica faltas totales EQ. VISITANTE", x="faltas eq. visitante", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
TARJETAS AMARILLAS
Histograma con curva de densidad sobre el total de tarjetas amarillas por partido.
ggplot(train, aes(`total_yellow_cards`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "yellow") + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica tarjetas amarillas totales", x="tarjetas amarillas", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Tarjetas amarillas totales respecto al resultado 1 X 2. El numero de tarjetas amarillas no parece un factor determinante.
ggplot(train,aes(score ,total_yellow_cards)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'yellow') + labs(title="Media de amarillas por partido", x="resultado", y="amarillas") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de tarjetas amarillas del equipo local.
ggplot(train, aes(`Home_Team_Yellow_Cards`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "yellow") + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica tarjetas amarillas totales EQ. LOCAL", x="tarjetas amarillas eq. local", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total tarjetas amarillas del equipo visitante.
ggplot(train, aes(`Away_Team_Yellow_Cards`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "yellow") + geom_density(alpha=.3, fill = "blue") + labs(title="Gráfica tarjetas amarillas totales EQ. VISITANTE", x="tarjetas amarillas eq. visitante", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
TARJETAS ROJAS
Histograma con curva de densidad sobre el total de tarjetas rojas por partido.
ggplot(train, aes(`total_red_cards`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "red") + geom_density(alpha=.3, fill = "green") + labs(title="Gráfica tarjetas rojas totales", x="tarjetas rojas", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Rojas totales respecto al resultado 1 X 2. El numero de tarjetas rojas no parece un factor determinante.
ggplot(train,aes(score ,total_red_cards)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'red') + labs(title="Media de rojas por partido", x="resultado", y="rojas") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de tarjetas rojas del equipo local.
ggplot(train, aes(`Home_Team_Red_Cards`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "red") + geom_density(alpha=.3, fill = "green") + labs(title="Gráfica tarjetas rojas totales EQ. LOCAL", x="tarjetas rojas eq. local", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total tarjetas rojas del equipo visitante.
ggplot(train, aes(`Away_Team_Red_Cards`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "red") + geom_density(alpha=.3, fill = "green") + labs(title="Gráfica tarjetas rojas totales EQ. VISITANTE", x="tarjetas rojas eq. visitante", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
GOLES
Histograma con curva de densidad sobre el total de tarjetas rojas por partido.
ggplot(train, aes(`goals`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "limegreen") + geom_density(alpha=.3, fill = "red") + labs(title="Gráfica goles totales", x="goles", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
En los partidos con victorias locales hay más goles de media que en los que gana el visitante (y bastante más que en los que hay empate). Por tanto, un partido con más goles es más probable que no acabe en empate.
ggplot(train,aes(score ,goals, fill = score)) + geom_bar(position = "dodge", stat = "summary", fun = "mean") + scale_fill_manual(values = c("limegreen", "lightblue", "indianred")) + labs(title="Media de goles por partido", x="resultado", y="goles") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total de goles del equipo local.
ggplot(train, aes(`Home_Team_Goals_Scored`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "limegreen") + geom_density(alpha=.3, fill = "green") + labs(title="Gráfica goles totales EQ. LOCAL", x="goles eq. local", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Histograma con curva de densidad sobre el total goles del equipo visitante.
ggplot(train, aes(`Away_Team_Goals_Scored`)) + geom_histogram(aes(y=..density..), position = "dodge", fun = "sum",color = 'black', fill = "limegreen") + geom_density(alpha=.3, fill = "green") + labs(title="Gráfica goles totales EQ. VISITANTE", x="goles eq. visitante", y="Cantidad") + theme(plot.title=element_text(hjust = 0.5))
Cuando el equipo local gana, mayor es su media de goles. Es decir, a mas goles, mas victorias. #JUNTAR ESTA GRAFICA CON LA ANTERIOR (cada columna coloreada con los goles locales y visitantes)
ggplot(train,aes(score ,Home_Team_Goals_Scored, Away_Team_Goals_Scored)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'green') + labs(title="media de goles EQ. LOCAL por partido", x="resultado", y="goles local") + theme(plot.title=element_text(hjust = 0.5))
Cuando el equipo local pierde, mayor es la media de goles del visitante. Es decir, a mas goles encajados, mas derrotas (obvio pero habia que comprobarlo)
ggplot(train,aes(score ,Away_Team_Goals_Scored)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'green') + labs(title="media de goles EQ. VISITANTE por partido", x="resultado", y="goles visitante") + theme(plot.title=element_text(hjust = 0.5))
ggplot(train, aes(x = goals, fill = score)) + geom_dotplot(binwidth = 0.1)
GRÁFICOS DOTPLOT POR AÑO / JORNADA
goles_year_jorn <- data_frame(train %>% group_by(year, jornada) %>% summarise( total_goles = sum(goals)))
tiros_year_jorn <- data_frame(train %>% group_by(year, jornada) %>% summarise( total_tiros = sum(total_shots)))
tiros_block_year_jorn <- data_frame(train %>% group_by(year, jornada) %>% summarise( total_tiros_bloqueados = sum(total_blocked_shots)))
corners_year_jorn <- data_frame(train %>% group_by(year, jornada) %>% summarise( total_corners = sum(total_corners)))
centros_year_jorn <- data_frame(train %>% group_by(year, jornada) %>% summarise( total_throw_ins = sum(total_throw_ins)))
pases_year_jorn <- data_frame(train %>% group_by(year, jornada) %>% summarise( total_pass_succ = sum(total_pass_success)))
d_aer_year_jorn <- data_frame(train %>% group_by(year, jornada) %>% summarise( total_d_aer = sum(total_aerials_won)))
t_despj_year_jorn <- data_frame(train %>% group_by(year, jornada) %>% summarise( total_clearances = sum(total_clearances)))
faltas_year_jorn <- data_frame(train %>% group_by(year, jornada) %>% summarise( total_fouls = sum(total_fouls)))
amarll_year_jorn <- data_frame(train %>% group_by(year, jornada) %>% summarise( total_yellow_cards = sum(total_yellow_cards)))
rojas_year_jorn <- data_frame(train %>% group_by(year, jornada) %>% summarise( total_red_cards = sum(total_red_cards)))
ggplot(goles_year_jorn, aes(x = jornada, y = total_goles)) + geom_point() + facet_grid(~year) + labs(x = "jornadas", y = "Nº de goles", title = "Nº de goles por jornada / Año") + theme(plot.title = element_text(hjust = 0.5)) + xlim(1,38)
ggplot(tiros_year_jorn, aes(x = jornada, y = total_tiros)) + geom_point() + facet_grid(~year) + labs(x = "jornadas", y = "Nº de disparos", title = "Nº de disparos por jornada / Año") + theme(plot.title = element_text(hjust = 0.5))
ggplot(tiros_block_year_jorn, aes(x = jornada, y = total_tiros_bloqueados)) + geom_point() + facet_grid(~year) + labs(x = "jornadas", y = "Nº de disparos_bloqueados", title = "Nº de disparos bloqueados por jornada / Año") + theme(plot.title = element_text(hjust = 0.5))
ggplot(corners_year_jorn, aes(x = jornada, y = total_corners)) + geom_point() + facet_grid(~year) + labs(x = "jornadas", y = "Nº de corners", title = "Nº de corners por jornada / Año") + theme(plot.title = element_text(hjust = 0.5))
ggplot(centros_year_jorn, aes(x = jornada, y = total_throw_ins)) + geom_point() + facet_grid(~year) + labs(x = "jornadas", y = "Nº de centros", title = "Nº de centros por jornada / Año") + theme(plot.title = element_text(hjust = 0.5))
ggplot(pases_year_jorn, aes(x = jornada, y = total_pass_succ)) + geom_point() + facet_grid(~year) + labs(x = "jornadas", y = "Nº de pases", title = "Nº de pases por jornada / Año") + theme(plot.title = element_text(hjust = 0.5))
ggplot(d_aer_year_jorn, aes(x = jornada, y = total_d_aer)) + geom_point() + facet_grid(~year) + labs(x = "jornadas", y = "Nº de duelos aéreos", title = "Nº de duelos aéreos por jornada / Año") + theme(plot.title = element_text(hjust = 0.5))
ggplot(t_despj_year_jorn, aes(x = jornada, y = total_clearances)) + geom_point() + facet_grid(~year) + labs(x = "jornadas", y = "Nº de despejes", title = "Nº de despejes por jornada / Año") + theme(plot.title = element_text(hjust = 0.5))
ggplot(faltas_year_jorn, aes(x = jornada, y = total_fouls)) + geom_point() + facet_grid(~year) + labs(x = "jornadas", y = "Nº de faltas", title = "Nº de faltas por jornada / Año") + theme(plot.title = element_text(hjust = 0.5))
ggplot(amarll_year_jorn, aes(x = jornada, y = total_yellow_cards)) + geom_point() + facet_grid(~year) + labs(x = "jornadas", y = "Nº de tarj. Amarillas", title = "Nº de tarj. Amarillas por jornada / Año") + theme(plot.title = element_text(hjust = 0.5))
ggplot(rojas_year_jorn, aes(x = jornada, y = total_red_cards)) + geom_point() + facet_grid(~year) + labs(x = "jornadas", y = "Nº de tarj. Rojas", title = "Nº de tarj. Rojas por jornada / Año") + theme(plot.title = element_text(hjust = 0.5))
4.3 MULTIVARIANTE
Primeramente realizamos un estudio de correlaciones mediante una matriz de las variables originales del dataset. Observamos lo siguiente:
- Tanto para equipos locales como visitantes hay alta correlación lineal entre el número total de disparos, a puerta y fuera.
- Igualmente también se muestran correlaciones elevadas entre el porcentaje % de éxito en pase y el % de posesión cuando se trata del mismo equipo.
- Correlaciones inversas entre porcentajes de posesión de ambos equipos cuando se trata una variable de cada uno.
num_data_orig <- train[4:28]
ggcorrplot(cor(num_data_orig))
A posteriori hacemos el mismo ejercicio con las variables en agregado. Observamos lo siguiente:
- Correlaciones positivas entre tiros y bloqueos, faltas y tarjetas amarillas, goles y disparos totales, corners y bloqueos de disparos, centros y despejes y despejes contra duelos aereos.
- Observamos correlaciones negativas entre pases y duelo aéreos, pases y centros y disparos y centros.
num_data <- train %>% select("goals", "jornada", "total_fouls", "total_yellow_cards", "total_red_cards", "total_shots","total_blocked_shots", "total_corners", "total_throw_ins", "total_pass_success", "total_aerials_won", "total_clearances")
ggcorrplot(cor(num_data),type = "lower", lab=TRUE)
GRAFICOS DE CORRELACIONES
train %>% select("score", "goals", "jornada", "total_fouls", "total_yellow_cards", "total_red_cards") %>% ggpairs(aes(color = score, alpha = .5))
train %>% select("score", "goals", "total_shots","total_blocked_shots", "total_corners", "total_throw_ins", "total_pass_success", "total_aerials_won", "total_clearances") %>% ggpairs(aes(color = score, alpha = .5))
Media de goles por partido con victoria local
sum(Victorias_casa$Home_Team_Goals_Scored,Victorias_casa$Away_Team_Goals_Scored)/nrow(Victorias_casa)## [1] 3.024943
Media de goles por partido con victoria visitante
sum(Derrotas_casa$Home_Team_Goals_Scored,Derrotas_casa$Away_Team_Goals_Scored)/nrow(Derrotas_casa)## [1] 2.863636
Media de goles por partido con empate
sum(Empates$Home_Team_Goals_Scored,Empates$Away_Team_Goals_Scored)/nrow(Empates)## [1] 1.995726
Puntos promedio por partido por equipo
puntos_promedio_casa <- aggregate((home_points) ~ Home_Team, data = train, mean)
puntos_promedio_fuera <- aggregate(away_points ~ Away_Team, data = train, mean)
puntos_promedio <- data.frame(puntos_promedio_casa$Home_Team, (puntos_promedio_casa$`(home_points)` + puntos_promedio_fuera$away_points)/2)
names(puntos_promedio) <- c("Equipo", "Puntos_por_partido")
puntos_promedio## Equipo Puntos_por_partido
## 1 ALAVÉS 1.3333333
## 2 ALMERÍA 0.8421053
## 3 ATHLETIC 1.4526316
## 4 ATLETICO MADRID 2.1000000
## 5 BARCELONA 2.3947368
## 6 CELTA 1.2947368
## 7 CÓRDOBA 0.5263158
## 8 DEPORTIVO 0.9342105
## 9 EIBAR 1.2105263
## 10 ELCHE 1.0789474
## 11 ESPANYOL 1.3157895
## 12 GETAFE 1.2302632
## 13 GIJÓN 0.9210526
## 14 GIRONA 1.1578947
## 15 GRANADA 0.8245614
## 16 HUESCA 0.8684211
## 17 LAS PALMAS 0.9210526
## 18 LEGANÉS 1.0789474
## 19 LEVANTE 1.0460526
## 20 MÁLAGA 1.0789474
## 21 OSASUNA 0.5789474
## 22 RAYO VALLECANO 1.0438596
## 23 REAL BETIS 1.2763158
## 24 REAL MADRID 2.2052632
## 25 REAL SOCIEDAD 1.3526316
## 26 SEVILLA FC 1.6684211
## 27 VALENCIA 1.5842105
## 28 VALLADOLID 1.0789474
## 29 VILLARREAL 1.5578947
Esta seria la clasificación con la media de puntos por partido por equipo
clasificacion_media <- arrange(puntos_promedio,desc(Puntos_por_partido))
clasificacion_media## Equipo Puntos_por_partido
## 1 BARCELONA 2.3947368
## 2 REAL MADRID 2.2052632
## 3 ATLETICO MADRID 2.1000000
## 4 SEVILLA FC 1.6684211
## 5 VALENCIA 1.5842105
## 6 VILLARREAL 1.5578947
## 7 ATHLETIC 1.4526316
## 8 REAL SOCIEDAD 1.3526316
## 9 ALAVÉS 1.3333333
## 10 ESPANYOL 1.3157895
## 11 CELTA 1.2947368
## 12 REAL BETIS 1.2763158
## 13 GETAFE 1.2302632
## 14 EIBAR 1.2105263
## 15 GIRONA 1.1578947
## 16 ELCHE 1.0789474
## 17 LEGANÉS 1.0789474
## 18 MÁLAGA 1.0789474
## 19 VALLADOLID 1.0789474
## 20 LEVANTE 1.0460526
## 21 RAYO VALLECANO 1.0438596
## 22 DEPORTIVO 0.9342105
## 23 GIJÓN 0.9210526
## 24 LAS PALMAS 0.9210526
## 25 HUESCA 0.8684211
## 26 ALMERÍA 0.8421053
## 27 GRANADA 0.8245614
## 28 OSASUNA 0.5789474
## 29 CÓRDOBA 0.5263158
aggregate(Home_Team_Goals_Scored ~ Home_Team, data = train, FUN = mean) -> goles_home_team
goles_home_team## Home_Team Home_Team_Goals_Scored
## 1 ALAVÉS 1.0350877
## 2 ALMERÍA 1.0526316
## 3 ATHLETIC 1.5157895
## 4 ATLETICO MADRID 1.8631579
## 5 BARCELONA 3.1473684
## 6 CELTA 1.6210526
## 7 CÓRDOBA 0.6315789
## 8 DEPORTIVO 1.2631579
## 9 EIBAR 1.3894737
## 10 ELCHE 1.0000000
## 11 ESPANYOL 1.2736842
## 12 GETAFE 1.2236842
## 13 GIJÓN 1.4210526
## 14 GIRONA 1.1315789
## 15 GRANADA 0.9824561
## 16 HUESCA 1.2631579
## 17 LAS PALMAS 1.2807018
## 18 LEGANÉS 1.0526316
## 19 LEVANTE 1.3421053
## 20 MÁLAGA 1.2894737
## 21 OSASUNA 1.2105263
## 22 RAYO VALLECANO 1.4035088
## 23 REAL BETIS 1.3026316
## 24 REAL MADRID 2.8315789
## 25 REAL SOCIEDAD 1.5894737
## 26 SEVILLA FC 1.9473684
## 27 VALENCIA 1.6736842
## 28 VALLADOLID 0.8421053
## 29 VILLARREAL 1.6105263aggregate(Away_Team_Goals_Scored ~ Away_Team, data = train, FUN = mean) -> goles_Away_team
goles_Away_team## Away_Team Away_Team_Goals_Scored
## 1 ALAVÉS 1.0701754
## 2 ALMERÍA 0.7894737
## 3 ATHLETIC 0.9578947
## 4 ATLETICO MADRID 1.4315789
## 5 BARCELONA 2.4000000
## 6 CELTA 1.1473684
## 7 CÓRDOBA 0.5263158
## 8 DEPORTIVO 0.8552632
## 9 EIBAR 1.0210526
## 10 ELCHE 0.8421053
## 11 ESPANYOL 1.0421053
## 12 GETAFE 0.8815789
## 13 GIJÓN 0.7368421
## 14 GIRONA 1.1578947
## 15 GRANADA 0.8596491
## 16 HUESCA 1.0000000
## 17 LAS PALMAS 0.8596491
## 18 LEGANÉS 0.8245614
## 19 LEVANTE 0.9473684
## 20 MÁLAGA 0.7236842
## 21 OSASUNA 0.8947368
## 22 RAYO VALLECANO 1.0350877
## 23 REAL BETIS 1.0526316
## 24 REAL MADRID 2.3368421
## 25 REAL SOCIEDAD 1.1368421
## 26 SEVILLA FC 1.2315789
## 27 VALENCIA 1.3578947
## 28 VALLADOLID 0.8421053
## 29 VILLARREAL 1.0631579goles_por_equipo <- data.frame(goles_home_team$Home_Team,(goles_Away_team$Away_Team_Goals_Scored + goles_home_team$Home_Team_Goals_Scored)/2)
names(goles_por_equipo) <- c("equipo", "goals")
goles_por_equipo## equipo goals
## 1 ALAVÉS 1.0526316
## 2 ALMERÍA 0.9210526
## 3 ATHLETIC 1.2368421
## 4 ATLETICO MADRID 1.6473684
## 5 BARCELONA 2.7736842
## 6 CELTA 1.3842105
## 7 CÓRDOBA 0.5789474
## 8 DEPORTIVO 1.0592105
## 9 EIBAR 1.2052632
## 10 ELCHE 0.9210526
## 11 ESPANYOL 1.1578947
## 12 GETAFE 1.0526316
## 13 GIJÓN 1.0789474
## 14 GIRONA 1.1447368
## 15 GRANADA 0.9210526
## 16 HUESCA 1.1315789
## 17 LAS PALMAS 1.0701754
## 18 LEGANÉS 0.9385965
## 19 LEVANTE 1.1447368
## 20 MÁLAGA 1.0065789
## 21 OSASUNA 1.0526316
## 22 RAYO VALLECANO 1.2192982
## 23 REAL BETIS 1.1776316
## 24 REAL MADRID 2.5842105
## 25 REAL SOCIEDAD 1.3631579
## 26 SEVILLA FC 1.5894737
## 27 VALENCIA 1.5157895
## 28 VALLADOLID 0.8421053
## 29 VILLARREAL 1.3368421
#No he sido capaz de poner encima una grafica de densidad con los puntos de cada equipo
ggplot(goles_por_equipo, aes(x = equipo, y = goals)) + geom_bar(position = "dodge", stat = "summary", fill = "darkred") + labs(title = "Comparación goles y puntos") + theme(plot.title = element_text(hjust = 0.5), axis.text.x = element_text(angle = 90))
Porcentaje medio de posesión por equipo en casa
tapply(train$`Home_Team_Possession_%`,train$`Home_Team`,mean)## ALAVÉS ALMERÍA ATHLETIC ATLETICO MADRID BARCELONA
## 43.87719 45.42105 51.76842 50.76842 66.08421
## CÁDIZ CF CELTA CÓRDOBA DEPORTIVO EIBAR
## NA 56.97895 51.47368 49.11842 51.06316
## ELCHE ESPANYOL GETAFE GIJÓN GIRONA
## 50.05263 47.56842 43.93421 45.89474 49.52632
## GRANADA HUESCA LAS PALMAS LEGANÉS LEVANTE
## 47.33333 47.31579 58.73684 45.61404 45.60526
## MÁLAGA MALLORCA OSASUNA RAYO VALLECANO REAL BETIS
## 48.85526 NA 40.57895 54.57895 55.34211
## REAL MADRID REAL SOCIEDAD SEVILLA FC VALENCIA VALLADOLID
## 59.89474 54.97895 55.46316 49.87368 49.89474
## VILLARREAL
## 50.91579
Porcentaje medio de posesión por equipo fuera de casa
tapply(train$`Away_Team_Possession_%`,train$`Away_Team`,mean)## ALAVÉS ALMERÍA ATHLETIC ATLETICO MADRID BARCELONA
## 40.47368 42.31579 49.17895 46.32632 66.09474
## CÁDIZ CF CELTA CÓRDOBA DEPORTIVO EIBAR
## NA 52.87368 41.21053 45.23684 45.73684
## ELCHE ESPANYOL GETAFE GIJÓN GIRONA
## 44.89474 45.05263 41.82895 41.42105 45.44737
## GRANADA HUESCA LAS PALMAS LEGANÉS LEVANTE
## 42.94737 41.21053 53.70175 41.05263 42.50000
## MÁLAGA MALLORCA OSASUNA RAYO VALLECANO REAL BETIS
## 46.07895 NA 37.42105 53.59649 51.92105
## REAL MADRID REAL SOCIEDAD SEVILLA FC VALENCIA VALLADOLID
## 57.13684 51.89474 50.96842 47.95789 43.47368
## VILLARREAL
## 45.96842
Con estos datos tan similares sacamos en conclusión que la posesión no ha influido mucho en las victorias(pobre Pep)
summary(Empates$`Home_Team_Possession_%`)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 21.0 45.0 53.0 51.8 59.0 81.0summary(Victorias_casa$`Home_Team_Possession_%`)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 22.00 44.00 52.00 52.29 60.00 82.00summary(Derrotas_casa$`Home_Team_Possession_%`)## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 19.00 43.00 52.00 50.82 59.00 77.00
Media de goles por partido de cada equipo en su casa
ggplot(train,aes(Home_Team ,Home_Team_Goals_Scored)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'red') + labs(title="media de goles de cada equipo como local", x="equipos", y="goles por partido") + theme(plot.title=element_text(hjust = 0.5), axis.text = element_text(angle = 90, color = "darkblue"))
Los equipos que más goles meten por partido, son los que más temporadas han estado en primera
ggplot(train,aes(Away_Team ,Away_Team_Goals_Scored)) + geom_bar(position = "dodge", stat = "summary", fun = "mean", color = 'black', fill = 'red') + labs(title="media de goles de cada equipo como visitante", x="equipos", y="goles por partido") + theme(plot.title=element_text(hjust = 0.5), axis.text = element_text(angle = 90, color = "darkblue"))
Correlación de algunas variables
pairs(train %>% select(Home_Team_Goals_Scored, Home_Team_On_Target_Shots, Home_Team_Total_Shots, `Home_Team_Possession_%`, `Home_Team_Pass_Success_%`, Home_Team_Corners, Home_Team_Throw_Ins, Home_Team_Fouls, Home_Team_Aerials_Won), pch = 21, bg = "black", col = "red")
# Esto lo borraría
hist(train$Home_Team_Goals_Scored,breaks=15, main = "Histograma de goles en casa", xlab = "goles")
# Esto lo borraría
hist(train$Away_Team_Goals_Scored,breaks=15, main = "Histograma de goles fuera",
xlab = "goles")
# Se marcan más goles en casa que fuera
En un 30% de las victorias de casa el equipo de casa tiró menos tiros que el de fuera
prop.table(table(Victorias_casa$Home_Team_Total_Shots > Victorias_casa$Away_Team_Total_Shots))##
## FALSE TRUE
## 0.2891156 0.7108844
Los tiros bloqueados no influyen mucho en el resultado del partido
prop.table(table(Victorias_casa$Home_Team_Blocked_Shots > Victorias_casa$Away_Team_Blocked_Shots))##
## FALSE TRUE
## 0.5260771 0.4739229
En las derrotas si vemos que el 43% de las veces bloquearon menos
prop.table(table(Derrotas_casa$Home_Team_Blocked_Shots > Derrotas_casa$Away_Team_Blocked_Shots))##
## FALSE TRUE
## 0.4454545 0.5545455
5 REGRESION
Una de las variables más influyentes es jugar en casa vamos a empezar haciendo un modelo de regresión lineal multiple incluyendo todas las variables para ver cuales son mas significativas respecto de un equipo que juega en casa:
lm_fit <- lm(Home_Team_Goals_Scored~.-Home_Team, data=train)
summary(lm_fit)##
## Call:
## lm(formula = Home_Team_Goals_Scored ~ . - Home_Team, data = train)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.059e-12 -3.340e-15 -6.500e-16 2.410e-15 8.192e-14
##
## Coefficients: (16 not defined because of singularities)
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 3.354e-10 1.625e-10 2.064e+00 0.0392 *
## ...1 4.407e-16 2.123e-16 2.076e+00 0.0381 *
## Away_TeamALMERÍA 2.230e-15 7.095e-15 3.140e-01 0.7533
## Away_TeamATHLETIC -9.827e-15 4.465e-15 -2.201e+00 0.0279 *
## Away_TeamATLETICO MADRID -1.933e-15 4.506e-15 -4.290e-01 0.6680
## Away_TeamBARCELONA 5.454e-15 5.061e-15 1.078e+00 0.2814
## Away_TeamCELTA 2.942e-15 4.533e-15 6.490e-01 0.5164
## Away_TeamCÓRDOBA 6.481e-15 7.093e-15 9.140e-01 0.3610
## Away_TeamDEPORTIVO 1.974e-15 4.689e-15 4.210e-01 0.6738
## Away_TeamEIBAR 5.247e-16 4.495e-15 1.170e-01 0.9071
## Away_TeamELCHE 4.571e-15 7.084e-15 6.450e-01 0.5189
## Away_TeamESPANYOL 1.583e-15 4.433e-15 3.570e-01 0.7210
## Away_TeamGETAFE 5.971e-16 4.654e-15 1.280e-01 0.8979
## Away_TeamGIJÓN 4.560e-16 5.567e-15 8.200e-02 0.9347
## Away_TeamGIRONA 2.524e-15 5.500e-15 4.590e-01 0.6463
## Away_TeamGRANADA 3.240e-15 5.028e-15 6.440e-01 0.5194
## Away_TeamHUESCA -2.392e-15 6.922e-15 -3.460e-01 0.7297
## Away_TeamLAS PALMAS 4.036e-15 5.123e-15 7.880e-01 0.4308
## Away_TeamLEGANÉS -8.944e-16 4.923e-15 -1.820e-01 0.8559
## Away_TeamLEVANTE 2.269e-15 4.617e-15 4.920e-01 0.6231
## Away_TeamMÁLAGA -1.414e-15 4.669e-15 -3.030e-01 0.7620
## Away_TeamOSASUNA 6.016e-15 6.984e-15 8.610e-01 0.3892
## Away_TeamRAYO VALLECANO 2.224e-15 5.083e-15 4.370e-01 0.6618
## Away_TeamREAL BETIS 5.258e-15 4.731e-15 1.112e+00 0.2665
## Away_TeamREAL MADRID -1.475e-15 4.804e-15 -3.070e-01 0.7589
## Away_TeamREAL SOCIEDAD 1.787e-15 4.492e-15 3.980e-01 0.6908
## Away_TeamSEVILLA FC 2.328e-15 4.503e-15 5.170e-01 0.6053
## Away_TeamVALENCIA -4.062e-16 4.485e-15 -9.100e-02 0.9279
## Away_TeamVALLADOLID -1.850e-15 6.962e-15 -2.660e-01 0.7904
## Away_TeamVILLARREAL 1.939e-16 4.486e-15 4.300e-02 0.9655
## `Home_Team_Possession_%` 1.308e-16 2.070e-16 6.320e-01 0.5276
## `Away_Team_Possession_%` NA NA NA NA
## Home_Team_Off_Target_Shots -2.700e-16 3.210e-15 -8.400e-02 0.9330
## Home_Team_On_Target_Shots -5.162e-16 3.210e-15 -1.610e-01 0.8723
## Home_Team_Total_Shots 1.685e-16 3.196e-15 5.300e-02 0.9580
## Home_Team_Blocked_Shots -3.271e-16 3.200e-15 -1.020e-01 0.9186
## Home_Team_Corners -6.799e-17 2.718e-16 -2.500e-01 0.8025
## Home_Team_Throw_Ins 1.283e-16 1.168e-16 1.098e+00 0.2722
## `Home_Team_Pass_Success_%` 6.041e-17 2.242e-16 2.700e-01 0.7876
## Home_Team_Aerials_Won -4.632e-17 1.194e-16 -3.880e-01 0.6981
## Home_Team_Clearances 1.331e-16 1.037e-16 1.284e+00 0.1992
## Home_Team_Fouls 1.557e-16 1.721e-16 9.050e-01 0.3657
## Home_Team_Yellow_Cards -5.244e-16 4.492e-16 -1.167e+00 0.2432
## Home_Team_Second_Yellow_Cards -1.571e-15 2.521e-15 -6.230e-01 0.5332
## Home_Team_Red_Cards -2.726e-14 2.865e-15 -9.515e+00 <2e-16 ***
## Away_Team_Off_Target_Shots 5.326e-16 2.743e-15 1.940e-01 0.8461
## Away_Team_On_Target_Shots -3.579e-16 2.758e-15 -1.300e-01 0.8968
## Away_Team_Total_Shots -3.019e-16 2.734e-15 -1.100e-01 0.9121
## Away_Team_Blocked_Shots 3.501e-16 2.755e-15 1.270e-01 0.8989
## Away_Team_Corners 1.253e-16 2.965e-16 4.220e-01 0.6727
## Away_Team_Throw_Ins 6.234e-17 1.232e-16 5.060e-01 0.6128
## `Away_Team_Pass_Success_%` -6.329e-17 2.145e-16 -2.950e-01 0.7680
## Away_Team_Aerials_Won -2.807e-17 1.258e-16 -2.230e-01 0.8234
## Away_Team_Clearances 2.071e-17 9.459e-17 2.190e-01 0.8267
## Away_Team_Fouls 1.753e-16 1.678e-16 1.044e+00 0.2965
## Away_Team_Yellow_Cards -3.342e-17 4.499e-16 -7.400e-02 0.9408
## Away_Team_Second_Yellow_Cards 3.949e-16 2.177e-15 1.810e-01 0.8561
## Away_Team_Red_Cards 2.327e-15 2.727e-15 8.530e-01 0.3937
## Away_Team_Goals_Scored -1.000e+00 1.363e-15 -7.338e+14 <2e-16 ***
## year -1.666e-13 8.069e-14 -2.064e+00 0.0391 *
## scorex -1.508e-15 1.970e-15 -7.650e-01 0.4441
## score2 -5.468e-15 2.760e-15 -1.981e+00 0.0477 *
## goals 1.000e+00 7.641e-16 1.309e+15 <2e-16 ***
## home_points NA NA NA NA
## away_points NA NA NA NA
## jornada -4.298e-15 2.124e-15 -2.024e+00 0.0431 *
## total_off_target_shots NA NA NA NA
## total_on_target_shots NA NA NA NA
## total_shots NA NA NA NA
## total_blocked_shots NA NA NA NA
## total_corners NA NA NA NA
## total_throw_ins NA NA NA NA
## total_pass_success NA NA NA NA
## total_aerials_won NA NA NA NA
## total_clearances NA NA NA NA
## total_fouls NA NA NA NA
## total_yellow_cards NA NA NA NA
## total_second_yellow_cards NA NA NA NA
## total_red_cards NA NA NA NA
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.591e-14 on 1837 degrees of freedom
## Multiple R-squared: 1, Adjusted R-squared: 1
## F-statistic: 8.501e+28 on 62 and 1837 DF, p-value: < 2.2e-16Variables más influyentes en los goles marcados: Centros, despejes, tarjetas rojas,
Regresión con todas las variables totales:
TOTAL GOLES
lm_goles <- lm(goals~., data = train)
summary(lm_goles)##
## Call:
## lm(formula = goals ~ ., data = train)
##
## Residuals:
## Min 1Q Median 3Q Max
## -5.377e-14 -2.470e-15 7.900e-16 3.550e-15 1.043e-12
##
## Coefficients: (16 not defined because of singularities)
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -3.491e-10 1.634e-10 -2.136e+00 0.0328 *
## ...1 -4.588e-16 2.135e-16 -2.149e+00 0.0317 *
## Home_TeamALMERÍA -4.928e-15 7.063e-15 -6.980e-01 0.4854
## Home_TeamATHLETIC -8.917e-16 4.472e-15 -1.990e-01 0.8420
## Home_TeamATLETICO MADRID -1.782e-15 4.524e-15 -3.940e-01 0.6936
## Home_TeamBARCELONA -6.873e-15 5.180e-15 -1.327e+00 0.1848
## Home_TeamCELTA -2.498e-15 4.584e-15 -5.450e-01 0.5859
## Home_TeamCÓRDOBA -1.832e-15 7.060e-15 -2.600e-01 0.7952
## Home_TeamDEPORTIVO -9.986e-16 4.657e-15 -2.140e-01 0.8302
## Home_TeamEIBAR -1.780e-15 4.562e-15 -3.900e-01 0.6965
## Home_TeamELCHE -2.973e-15 7.082e-15 -4.200e-01 0.6747
## Home_TeamESPANYOL -1.541e-15 4.413e-15 -3.490e-01 0.7270
## Home_TeamGETAFE -4.695e-15 4.651e-15 -1.010e+00 0.3128
## Home_TeamGIJÓN -6.620e-15 5.577e-15 -1.187e+00 0.2354
## Home_TeamGIRONA -9.266e-16 5.495e-15 -1.690e-01 0.8661
## Home_TeamGRANADA -2.514e-15 4.993e-15 -5.030e-01 0.6147
## Home_TeamHUESCA -1.438e-16 6.932e-15 -2.100e-02 0.9835
## Home_TeamLAS PALMAS -2.217e-15 5.201e-15 -4.260e-01 0.6699
## Home_TeamLEGANÉS -2.859e-15 4.900e-15 -5.830e-01 0.5597
## Home_TeamLEVANTE -5.979e-15 4.621e-15 -1.294e+00 0.1959
## Home_TeamMÁLAGA 1.089e-14 4.653e-15 2.341e+00 0.0193 *
## Home_TeamOSASUNA -2.278e-15 6.996e-15 -3.260e-01 0.7448
## Home_TeamRAYO VALLECANO -3.383e-15 5.073e-15 -6.670e-01 0.5049
## Home_TeamREAL BETIS -2.581e-15 4.753e-15 -5.430e-01 0.5872
## Home_TeamREAL MADRID -6.997e-15 4.967e-15 -1.409e+00 0.1591
## Home_TeamREAL SOCIEDAD -1.008e-15 4.524e-15 -2.230e-01 0.8237
## Home_TeamSEVILLA FC -3.075e-15 4.594e-15 -6.690e-01 0.5033
## Home_TeamVALENCIA -2.104e-15 4.503e-15 -4.670e-01 0.6404
## Home_TeamVALLADOLID -1.191e-15 6.973e-15 -1.710e-01 0.8644
## Home_TeamVILLARREAL -3.735e-15 4.504e-15 -8.290e-01 0.4070
## Away_TeamALMERÍA 1.557e-15 7.069e-15 2.200e-01 0.8257
## Away_TeamATHLETIC 9.750e-15 4.472e-15 2.180e+00 0.0294 *
## Away_TeamATLETICO MADRID 1.345e-15 4.507e-15 2.980e-01 0.7654
## Away_TeamBARCELONA -6.950e-15 5.199e-15 -1.337e+00 0.1815
## Away_TeamCELTA -1.525e-15 4.541e-15 -3.360e-01 0.7370
## Away_TeamCÓRDOBA -4.751e-15 7.077e-15 -6.710e-01 0.5021
## Away_TeamDEPORTIVO -4.237e-16 4.677e-15 -9.100e-02 0.9278
## Away_TeamEIBAR 4.373e-16 4.505e-15 9.700e-02 0.9227
## Away_TeamELCHE -1.016e-15 7.060e-15 -1.440e-01 0.8855
## Away_TeamESPANYOL 2.270e-17 4.421e-15 5.000e-03 0.9959
## Away_TeamGETAFE -9.106e-16 4.643e-15 -1.960e-01 0.8445
## Away_TeamGIJÓN 1.290e-15 5.546e-15 2.330e-01 0.8161
## Away_TeamGIRONA -1.263e-15 5.481e-15 -2.310e-01 0.8177
## Away_TeamGRANADA -1.614e-15 5.015e-15 -3.220e-01 0.7476
## Away_TeamHUESCA 2.886e-15 6.898e-15 4.180e-01 0.6758
## Away_TeamLAS PALMAS -3.793e-15 5.128e-15 -7.400e-01 0.4597
## Away_TeamLEGANÉS 1.005e-15 4.909e-15 2.050e-01 0.8377
## Away_TeamLEVANTE -1.011e-15 4.601e-15 -2.200e-01 0.8261
## Away_TeamMÁLAGA 6.563e-16 4.657e-15 1.410e-01 0.8879
## Away_TeamOSASUNA -2.233e-15 6.969e-15 -3.200e-01 0.7487
## Away_TeamRAYO VALLECANO -4.059e-16 5.084e-15 -8.000e-02 0.9364
## Away_TeamREAL BETIS -2.487e-15 4.737e-15 -5.250e-01 0.5996
## Away_TeamREAL MADRID -4.678e-15 4.870e-15 -9.610e-01 0.3368
## Away_TeamREAL SOCIEDAD 4.856e-16 4.505e-15 1.080e-01 0.9142
## Away_TeamSEVILLA FC -1.461e-15 4.504e-15 -3.240e-01 0.7456
## Away_TeamVALENCIA -4.351e-16 4.486e-15 -9.700e-02 0.9228
## Away_TeamVALLADOLID 2.722e-15 6.937e-15 3.920e-01 0.6948
## Away_TeamVILLARREAL -2.906e-16 4.482e-15 -6.500e-02 0.9483
## `Home_Team_Possession_%` 2.794e-16 2.253e-16 1.240e+00 0.2150
## `Away_Team_Possession_%` NA NA NA NA
## Home_Team_Off_Target_Shots 8.185e-17 3.214e-15 2.500e-02 0.9797
## Home_Team_On_Target_Shots -8.001e-18 3.214e-15 -2.000e-03 0.9980
## Home_Team_Total_Shots 1.021e-16 3.201e-15 3.200e-02 0.9745
## Home_Team_Blocked_Shots -1.755e-16 3.204e-15 -5.500e-02 0.9563
## Home_Team_Corners 1.862e-16 2.744e-16 6.790e-01 0.4974
## Home_Team_Throw_Ins -3.609e-16 1.202e-16 -3.004e+00 0.0027 **
## `Home_Team_Pass_Success_%` -4.713e-16 2.391e-16 -1.971e+00 0.0489 *
## Home_Team_Aerials_Won 6.828e-18 1.268e-16 5.400e-02 0.9571
## Home_Team_Clearances -2.508e-16 1.045e-16 -2.400e+00 0.0165 *
## Home_Team_Fouls -1.568e-16 1.753e-16 -8.950e-01 0.3711
## Home_Team_Yellow_Cards 3.228e-16 4.523e-16 7.140e-01 0.4755
## Home_Team_Second_Yellow_Cards -1.237e-15 2.527e-15 -4.900e-01 0.6245
## Home_Team_Red_Cards 2.649e-14 2.890e-15 9.167e+00 <2e-16 ***
## Away_Team_Off_Target_Shots 5.538e-17 2.738e-15 2.000e-02 0.9839
## Away_Team_On_Target_Shots 1.171e-15 2.753e-15 4.250e-01 0.6706
## Away_Team_Total_Shots -1.705e-16 2.730e-15 -6.200e-02 0.9502
## Away_Team_Blocked_Shots 9.574e-17 2.750e-15 3.500e-02 0.9722
## Away_Team_Corners -6.143e-19 2.978e-16 -2.000e-03 0.9984
## Away_Team_Throw_Ins -5.435e-17 1.273e-16 -4.270e-01 0.6694
## `Away_Team_Pass_Success_%` 2.718e-16 2.246e-16 1.210e+00 0.2263
## Away_Team_Aerials_Won 7.758e-18 1.277e-16 6.100e-02 0.9516
## Away_Team_Clearances -9.573e-17 9.823e-17 -9.750e-01 0.3299
## Away_Team_Fouls -2.243e-16 1.728e-16 -1.298e+00 0.1945
## Away_Team_Yellow_Cards 2.546e-16 4.548e-16 5.600e-01 0.5757
## Away_Team_Second_Yellow_Cards -1.459e-15 2.201e-15 -6.630e-01 0.5074
## Away_Team_Red_Cards -3.841e-15 2.735e-15 -1.405e+00 0.1603
## Home_Team_Goals_Scored 1.000e+00 7.748e-16 1.291e+15 <2e-16 ***
## Away_Team_Goals_Scored 1.000e+00 8.796e-16 1.137e+15 <2e-16 ***
## year 1.734e-13 8.114e-14 2.137e+00 0.0328 *
## scorex -3.416e-15 1.985e-15 -1.720e+00 0.0855 .
## score2 -4.588e-15 2.792e-15 -1.643e+00 0.1005
## home_points NA NA NA NA
## away_points NA NA NA NA
## jornada 4.480e-15 2.135e-15 2.098e+00 0.0360 *
## total_off_target_shots NA NA NA NA
## total_on_target_shots NA NA NA NA
## total_shots NA NA NA NA
## total_blocked_shots NA NA NA NA
## total_corners NA NA NA NA
## total_throw_ins NA NA NA NA
## total_pass_success NA NA NA NA
## total_aerials_won NA NA NA NA
## total_clearances NA NA NA NA
## total_fouls NA NA NA NA
## total_yellow_cards NA NA NA NA
## total_second_yellow_cards NA NA NA NA
## total_red_cards NA NA NA NA
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.576e-14 on 1809 degrees of freedom
## Multiple R-squared: 1, Adjusted R-squared: 1
## F-statistic: 9.527e+28 on 90 and 1809 DF, p-value: < 2.2e-16
TOTAL DISPAROS
lm_disparos <- lm(total_shots~., data = train)
summary(lm_disparos)##
## Call:
## lm(formula = total_shots ~ ., data = train)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.010e-13 -1.160e-14 4.700e-15 1.960e-14 5.761e-12
##
## Coefficients: (16 not defined because of singularities)
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -1.818e-09 8.997e-10 -2.021e+00 0.04341 *
## ...1 -2.389e-15 1.175e-15 -2.033e+00 0.04224 *
## Home_TeamALMERÍA -9.626e-15 3.888e-14 -2.480e-01 0.80451
## Home_TeamATHLETIC -3.543e-15 2.462e-14 -1.440e-01 0.88559
## Home_TeamATLETICO MADRID -1.071e-14 2.491e-14 -4.300e-01 0.66726
## Home_TeamBARCELONA -3.608e-14 2.852e-14 -1.265e+00 0.20605
## Home_TeamCELTA -1.111e-14 2.524e-14 -4.400e-01 0.65990
## Home_TeamCÓRDOBA 1.025e-15 3.887e-14 2.600e-02 0.97896
## Home_TeamDEPORTIVO -7.908e-15 2.564e-14 -3.080e-01 0.75776
## Home_TeamEIBAR -9.248e-15 2.512e-14 -3.680e-01 0.71277
## Home_TeamELCHE -1.291e-14 3.899e-14 -3.310e-01 0.74058
## Home_TeamESPANYOL -9.120e-15 2.429e-14 -3.750e-01 0.70743
## Home_TeamGETAFE -2.283e-14 2.560e-14 -8.920e-01 0.37266
## Home_TeamGIJÓN -3.527e-14 3.070e-14 -1.149e+00 0.25087
## Home_TeamGIRONA 8.834e-16 3.025e-14 2.900e-02 0.97671
## Home_TeamGRANADA -1.140e-14 2.749e-14 -4.150e-01 0.67830
## Home_TeamHUESCA -4.139e-15 3.817e-14 -1.080e-01 0.91364
## Home_TeamLAS PALMAS -1.583e-15 2.863e-14 -5.500e-02 0.95590
## Home_TeamLEGANÉS -1.860e-14 2.698e-14 -6.900e-01 0.49058
## Home_TeamLEVANTE -2.021e-14 2.544e-14 -7.940e-01 0.42705
## Home_TeamMÁLAGA 5.914e-14 2.561e-14 2.309e+00 0.02107 *
## Home_TeamOSASUNA -1.810e-14 3.852e-14 -4.700e-01 0.63843
## Home_TeamRAYO VALLECANO -1.170e-14 2.793e-14 -4.190e-01 0.67523
## Home_TeamREAL BETIS -4.245e-15 2.617e-14 -1.620e-01 0.87115
## Home_TeamREAL MADRID -3.693e-14 2.735e-14 -1.350e+00 0.17708
## Home_TeamREAL SOCIEDAD -2.974e-15 2.491e-14 -1.190e-01 0.90495
## Home_TeamSEVILLA FC -1.666e-14 2.529e-14 -6.590e-01 0.51016
## Home_TeamVALENCIA -6.191e-15 2.479e-14 -2.500e-01 0.80283
## Home_TeamVALLADOLID 1.211e-14 3.839e-14 3.160e-01 0.75240
## Home_TeamVILLARREAL -1.166e-14 2.479e-14 -4.700e-01 0.63824
## Away_TeamALMERÍA 5.437e-15 3.892e-14 1.400e-01 0.88891
## Away_TeamATHLETIC 6.796e-14 2.462e-14 2.760e+00 0.00583 **
## Away_TeamATLETICO MADRID 7.408e-15 2.481e-14 2.990e-01 0.76532
## Away_TeamBARCELONA -3.432e-14 2.862e-14 -1.199e+00 0.23065
## Away_TeamCELTA -2.782e-15 2.500e-14 -1.110e-01 0.91141
## Away_TeamCÓRDOBA -1.002e-14 3.896e-14 -2.570e-01 0.79704
## Away_TeamDEPORTIVO 6.125e-16 2.575e-14 2.400e-02 0.98102
## Away_TeamEIBAR 9.954e-15 2.480e-14 4.010e-01 0.68825
## Away_TeamELCHE -1.813e-14 3.887e-14 -4.660e-01 0.64093
## Away_TeamESPANYOL 2.160e-15 2.434e-14 8.900e-02 0.92929
## Away_TeamGETAFE 4.568e-15 2.556e-14 1.790e-01 0.85817
## Away_TeamGIJÓN 8.775e-15 3.053e-14 2.870e-01 0.77381
## Away_TeamGIRONA -2.012e-15 3.017e-14 -6.700e-02 0.94685
## Away_TeamGRANADA -7.108e-15 2.761e-14 -2.570e-01 0.79687
## Away_TeamHUESCA 2.064e-14 3.798e-14 5.440e-01 0.58680
## Away_TeamLAS PALMAS -1.674e-14 2.823e-14 -5.930e-01 0.55322
## Away_TeamLEGANÉS 6.609e-15 2.703e-14 2.450e-01 0.80685
## Away_TeamLEVANTE -1.484e-15 2.533e-14 -5.900e-02 0.95330
## Away_TeamMÁLAGA 1.002e-14 2.564e-14 3.910e-01 0.69593
## Away_TeamOSASUNA -1.222e-15 3.837e-14 -3.200e-02 0.97459
## Away_TeamRAYO VALLECANO -9.915e-15 2.799e-14 -3.540e-01 0.72321
## Away_TeamREAL BETIS -1.508e-14 2.608e-14 -5.780e-01 0.56319
## Away_TeamREAL MADRID 1.001e-14 2.681e-14 3.740e-01 0.70881
## Away_TeamREAL SOCIEDAD 2.520e-15 2.480e-14 1.020e-01 0.91909
## Away_TeamSEVILLA FC -1.050e-14 2.480e-14 -4.230e-01 0.67211
## Away_TeamVALENCIA -2.866e-15 2.470e-14 -1.160e-01 0.90764
## Away_TeamVALLADOLID 1.985e-14 3.819e-14 5.200e-01 0.60323
## Away_TeamVILLARREAL 2.642e-15 2.468e-14 1.070e-01 0.91476
## `Home_Team_Possession_%` 1.037e-15 1.240e-15 8.360e-01 0.40327
## `Away_Team_Possession_%` NA NA NA NA
## Home_Team_Off_Target_Shots -2.294e-15 1.770e-14 -1.300e-01 0.89686
## Home_Team_On_Target_Shots 7.450e-16 1.769e-14 4.200e-02 0.96641
## Home_Team_Total_Shots 1.000e+00 1.762e-14 5.674e+13 < 2e-16 ***
## Home_Team_Blocked_Shots 6.550e-16 1.764e-14 3.700e-02 0.97038
## Home_Team_Corners -6.196e-16 1.511e-15 -4.100e-01 0.68174
## Home_Team_Throw_Ins -1.275e-15 6.615e-16 -1.927e+00 0.05416 .
## `Home_Team_Pass_Success_%` -2.295e-15 1.316e-15 -1.743e+00 0.08147 .
## Home_Team_Aerials_Won -3.736e-16 6.981e-16 -5.350e-01 0.59262
## Home_Team_Clearances -7.127e-16 5.752e-16 -1.239e+00 0.21553
## Home_Team_Fouls -7.342e-16 9.650e-16 -7.610e-01 0.44690
## Home_Team_Yellow_Cards 1.713e-15 2.490e-15 6.880e-01 0.49151
## Home_Team_Second_Yellow_Cards -9.186e-16 1.391e-14 -6.600e-02 0.94735
## Home_Team_Red_Cards 1.456e-13 1.591e-14 9.150e+00 < 2e-16 ***
## Away_Team_Off_Target_Shots 2.403e-16 1.508e-14 1.600e-02 0.98728
## Away_Team_On_Target_Shots 1.910e-15 1.516e-14 1.260e-01 0.89977
## Away_Team_Total_Shots 1.000e+00 1.503e-14 6.655e+13 < 2e-16 ***
## Away_Team_Blocked_Shots -1.348e-15 1.514e-14 -8.900e-02 0.92908
## Away_Team_Corners -3.083e-16 1.640e-15 -1.880e-01 0.85085
## Away_Team_Throw_Ins -3.682e-16 7.006e-16 -5.260e-01 0.59923
## `Away_Team_Pass_Success_%` 1.416e-15 1.236e-15 1.145e+00 0.25237
## Away_Team_Aerials_Won -4.225e-17 7.032e-16 -6.000e-02 0.95209
## Away_Team_Clearances -1.860e-16 5.408e-16 -3.440e-01 0.73094
## Away_Team_Fouls -1.305e-15 9.516e-16 -1.372e+00 0.17026
## Away_Team_Yellow_Cards 8.474e-16 2.504e-15 3.380e-01 0.73509
## Away_Team_Second_Yellow_Cards -7.509e-15 1.212e-14 -6.200e-01 0.53550
## Away_Team_Red_Cards -1.554e-14 1.506e-14 -1.032e+00 0.30207
## Home_Team_Goals_Scored -3.181e-15 4.266e-15 -7.460e-01 0.45590
## Away_Team_Goals_Scored -3.648e-15 4.842e-15 -7.530e-01 0.45131
## year 9.030e-13 4.467e-13 2.021e+00 0.04338 *
## scorex -1.853e-14 1.093e-14 -1.695e+00 0.09026 .
## score2 -2.496e-14 1.537e-14 -1.624e+00 0.10464
## goals NA NA NA NA
## home_points NA NA NA NA
## away_points NA NA NA NA
## jornada 2.332e-14 1.176e-14 1.984e+00 0.04743 *
## total_off_target_shots NA NA NA NA
## total_on_target_shots NA NA NA NA
## total_blocked_shots NA NA NA NA
## total_corners NA NA NA NA
## total_throw_ins NA NA NA NA
## total_pass_success NA NA NA NA
## total_aerials_won NA NA NA NA
## total_clearances NA NA NA NA
## total_fouls NA NA NA NA
## total_yellow_cards NA NA NA NA
## total_second_yellow_cards NA NA NA NA
## total_red_cards NA NA NA NA
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1.418e-13 on 1809 degrees of freedom
## Multiple R-squared: 1, Adjusted R-squared: 1
## F-statistic: 3.376e+28 on 90 and 1809 DF, p-value: < 2.2e-16
TOTAL DISPAROS BLOQUEADOS
lm_disparos_bloqueados <- lm(total_blocked_shots~., data = train)
summary(lm_disparos_bloqueados)##
## Call:
## lm(formula = total_blocked_shots ~ ., data = train)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.138e-12 -4.010e-15 -9.300e-16 2.650e-15 8.409e-14
##
## Coefficients: (16 not defined because of singularities)
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 4.010e-10 1.789e-10 2.242e+00 0.0251 *
## ...1 5.263e-16 2.337e-16 2.252e+00 0.0244 *
## Home_TeamALMERÍA -9.151e-16 7.731e-15 -1.180e-01 0.9058
## Home_TeamATHLETIC -9.075e-16 4.895e-15 -1.850e-01 0.8529
## Home_TeamATLETICO MADRID 8.745e-16 4.952e-15 1.770e-01 0.8598
## Home_TeamBARCELONA 3.741e-15 5.670e-15 6.600e-01 0.5094
## Home_TeamCELTA 3.255e-15 5.017e-15 6.490e-01 0.5165
## Home_TeamCÓRDOBA 2.310e-16 7.727e-15 3.000e-02 0.9762
## Home_TeamDEPORTIVO -5.008e-16 5.097e-15 -9.800e-02 0.9217
## Home_TeamEIBAR 3.694e-16 4.994e-15 7.400e-02 0.9410
## Home_TeamELCHE 1.696e-15 7.751e-15 2.190e-01 0.8268
## Home_TeamESPANYOL -2.423e-16 4.830e-15 -5.000e-02 0.9600
## Home_TeamGETAFE 1.107e-15 5.090e-15 2.180e-01 0.8278
## Home_TeamGIJÓN 2.966e-15 6.104e-15 4.860e-01 0.6271
## Home_TeamGIRONA -2.787e-16 6.015e-15 -4.600e-02 0.9630
## Home_TeamGRANADA 2.387e-15 5.465e-15 4.370e-01 0.6623
## Home_TeamHUESCA -3.158e-15 7.588e-15 -4.160e-01 0.6773
## Home_TeamLAS PALMAS 3.032e-15 5.692e-15 5.330e-01 0.5943
## Home_TeamLEGANÉS 2.548e-15 5.364e-15 4.750e-01 0.6348
## Home_TeamLEVANTE 4.431e-15 5.058e-15 8.760e-01 0.3812
## Home_TeamMÁLAGA -1.222e-14 5.092e-15 -2.399e+00 0.0165 *
## Home_TeamOSASUNA 1.081e-15 7.658e-15 1.410e-01 0.8877
## Home_TeamRAYO VALLECANO 4.580e-15 5.552e-15 8.250e-01 0.4096
## Home_TeamREAL BETIS -4.990e-16 5.202e-15 -9.600e-02 0.9236
## Home_TeamREAL MADRID 1.902e-15 5.437e-15 3.500e-01 0.7265
## Home_TeamREAL SOCIEDAD -3.464e-16 4.952e-15 -7.000e-02 0.9442
## Home_TeamSEVILLA FC 1.517e-15 5.028e-15 3.020e-01 0.7629
## Home_TeamVALENCIA -2.083e-16 4.929e-15 -4.200e-02 0.9663
## Home_TeamVALLADOLID 3.131e-16 7.632e-15 4.100e-02 0.9673
## Home_TeamVILLARREAL 2.015e-15 4.929e-15 4.090e-01 0.6827
## Away_TeamALMERÍA -1.284e-15 7.737e-15 -1.660e-01 0.8682
## Away_TeamATHLETIC -1.162e-14 4.894e-15 -2.374e+00 0.0177 *
## Away_TeamATLETICO MADRID -9.155e-16 4.933e-15 -1.860e-01 0.8528
## Away_TeamBARCELONA 4.897e-15 5.690e-15 8.610e-01 0.3896
## Away_TeamCELTA 4.192e-16 4.970e-15 8.400e-02 0.9328
## Away_TeamCÓRDOBA 2.275e-15 7.746e-15 2.940e-01 0.7690
## Away_TeamDEPORTIVO 1.743e-15 5.119e-15 3.400e-01 0.7336
## Away_TeamEIBAR -1.268e-15 4.931e-15 -2.570e-01 0.7970
## Away_TeamELCHE 6.923e-15 7.728e-15 8.960e-01 0.3705
## Away_TeamESPANYOL -1.668e-15 4.839e-15 -3.450e-01 0.7304
## Away_TeamGETAFE 1.907e-15 5.082e-15 3.750e-01 0.7075
## Away_TeamGIJÓN -1.275e-15 6.070e-15 -2.100e-01 0.8336
## Away_TeamGIRONA -4.599e-16 5.999e-15 -7.700e-02 0.9389
## Away_TeamGRANADA 2.195e-15 5.489e-15 4.000e-01 0.6893
## Away_TeamHUESCA -2.668e-15 7.550e-15 -3.530e-01 0.7239
## Away_TeamLAS PALMAS 1.862e-15 5.613e-15 3.320e-01 0.7401
## Away_TeamLEGANÉS -5.675e-16 5.373e-15 -1.060e-01 0.9159
## Away_TeamLEVANTE 1.966e-15 5.036e-15 3.900e-01 0.6963
## Away_TeamMÁLAGA 1.985e-15 5.097e-15 3.900e-01 0.6969
## Away_TeamOSASUNA 3.951e-16 7.628e-15 5.200e-02 0.9587
## Away_TeamRAYO VALLECANO 1.100e-15 5.565e-15 1.980e-01 0.8434
## Away_TeamREAL BETIS 2.231e-15 5.185e-15 4.300e-01 0.6670
## Away_TeamREAL MADRID -5.461e-15 5.330e-15 -1.025e+00 0.3057
## Away_TeamREAL SOCIEDAD 2.237e-15 4.930e-15 4.540e-01 0.6501
## Away_TeamSEVILLA FC 8.668e-17 4.930e-15 1.800e-02 0.9860
## Away_TeamVALENCIA 1.145e-16 4.910e-15 2.300e-02 0.9814
## Away_TeamVALLADOLID -2.384e-15 7.593e-15 -3.140e-01 0.7536
## Away_TeamVILLARREAL 1.141e-16 4.906e-15 2.300e-02 0.9814
## `Home_Team_Possession_%` -3.673e-16 2.465e-16 -1.490e+00 0.1365
## `Away_Team_Possession_%` NA NA NA NA
## Home_Team_Off_Target_Shots -4.112e-15 3.518e-15 -1.169e+00 0.2427
## Home_Team_On_Target_Shots -3.830e-15 3.517e-15 -1.089e+00 0.2763
## Home_Team_Total_Shots 4.058e-15 3.504e-15 1.158e+00 0.2469
## Home_Team_Blocked_Shots 1.000e+00 3.507e-15 2.852e+14 <2e-16 ***
## Home_Team_Corners 5.765e-17 3.003e-16 1.920e-01 0.8478
## Home_Team_Throw_Ins 2.110e-16 1.315e-16 1.604e+00 0.1089
## `Home_Team_Pass_Success_%` 5.171e-16 2.617e-16 1.976e+00 0.0483 *
## Home_Team_Aerials_Won 9.354e-17 1.388e-16 6.740e-01 0.5004
## Home_Team_Clearances 1.835e-16 1.144e-16 1.605e+00 0.1087
## Home_Team_Fouls 2.462e-16 1.919e-16 1.283e+00 0.1997
## Home_Team_Yellow_Cards -3.167e-16 4.951e-16 -6.400e-01 0.5225
## Home_Team_Second_Yellow_Cards 2.217e-16 2.765e-15 8.000e-02 0.9361
## Home_Team_Red_Cards -2.887e-14 3.163e-15 -9.129e+00 <2e-16 ***
## Away_Team_Off_Target_Shots 2.471e-15 2.997e-15 8.250e-01 0.4097
## Away_Team_On_Target_Shots 2.058e-15 3.014e-15 6.830e-01 0.4948
## Away_Team_Total_Shots -2.365e-15 2.988e-15 -7.920e-01 0.4287
## Away_Team_Blocked_Shots 1.000e+00 3.010e-15 3.323e+14 <2e-16 ***
## Away_Team_Corners 1.946e-16 3.260e-16 5.970e-01 0.5506
## Away_Team_Throw_Ins 8.775e-17 1.393e-16 6.300e-01 0.5288
## `Away_Team_Pass_Success_%` -2.328e-16 2.458e-16 -9.470e-01 0.3438
## Away_Team_Aerials_Won 5.508e-18 1.398e-16 3.900e-02 0.9686
## Away_Team_Clearances 2.991e-17 1.075e-16 2.780e-01 0.7809
## Away_Team_Fouls 2.684e-16 1.892e-16 1.419e+00 0.1561
## Away_Team_Yellow_Cards -1.132e-16 4.978e-16 -2.270e-01 0.8201
## Away_Team_Second_Yellow_Cards 8.794e-16 2.409e-15 3.650e-01 0.7151
## Away_Team_Red_Cards 3.001e-15 2.993e-15 1.002e+00 0.3163
## Home_Team_Goals_Scored 7.579e-16 8.480e-16 8.940e-01 0.3716
## Away_Team_Goals_Scored 6.112e-16 9.627e-16 6.350e-01 0.5256
## year -1.992e-13 8.881e-14 -2.243e+00 0.0250 *
## scorex 3.885e-15 2.173e-15 1.788e+00 0.0740 .
## score2 5.604e-15 3.056e-15 1.834e+00 0.0669 .
## goals NA NA NA NA
## home_points NA NA NA NA
## away_points NA NA NA NA
## jornada -5.156e-15 2.337e-15 -2.206e+00 0.0275 *
## total_off_target_shots NA NA NA NA
## total_on_target_shots NA NA NA NA
## total_shots NA NA NA NA
## total_corners NA NA NA NA
## total_throw_ins NA NA NA NA
## total_pass_success NA NA NA NA
## total_aerials_won NA NA NA NA
## total_clearances NA NA NA NA
## total_fouls NA NA NA NA
## total_yellow_cards NA NA NA NA
## total_second_yellow_cards NA NA NA NA
## total_red_cards NA NA NA NA
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.819e-14 on 1809 degrees of freedom
## Multiple R-squared: 1, Adjusted R-squared: 1
## F-statistic: 1.824e+29 on 90 and 1809 DF, p-value: < 2.2e-16
TOTAL CORNERS
lm_corners <- lm(total_corners~., data = train)
summary(lm_corners)##
## Call:
## lm(formula = total_corners ~ ., data = train)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.460e-12 -5.420e-15 -1.220e-15 3.350e-15 2.049e-13
##
## Coefficients: (16 not defined because of singularities)
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 4.911e-10 2.317e-10 2.119e+00 0.03418 *
## ...1 6.439e-16 3.027e-16 2.127e+00 0.03353 *
## Home_TeamALMERÍA 9.190e-15 1.001e-14 9.180e-01 0.35889
## Home_TeamATHLETIC -1.292e-15 6.340e-15 -2.040e-01 0.83857
## Home_TeamATLETICO MADRID 3.614e-15 6.414e-15 5.630e-01 0.57318
## Home_TeamBARCELONA 1.398e-15 7.345e-15 1.900e-01 0.84903
## Home_TeamCELTA -2.668e-16 6.499e-15 -4.100e-02 0.96726
## Home_TeamCÓRDOBA 4.214e-15 1.001e-14 4.210e-01 0.67380
## Home_TeamDEPORTIVO 1.278e-15 6.602e-15 1.940e-01 0.84658
## Home_TeamEIBAR -9.428e-17 6.469e-15 -1.500e-02 0.98837
## Home_TeamELCHE -1.490e-15 1.004e-14 -1.480e-01 0.88204
## Home_TeamESPANYOL -9.279e-16 6.257e-15 -1.480e-01 0.88212
## Home_TeamGETAFE 3.028e-15 6.594e-15 4.590e-01 0.64610
## Home_TeamGIJÓN 3.368e-15 7.907e-15 4.260e-01 0.67024
## Home_TeamGIRONA -3.267e-16 7.792e-15 -4.200e-02 0.96656
## Home_TeamGRANADA 3.766e-15 7.079e-15 5.320e-01 0.59477
## Home_TeamHUESCA 1.675e-16 9.829e-15 1.700e-02 0.98641
## Home_TeamLAS PALMAS -1.880e-15 7.373e-15 -2.550e-01 0.79873
## Home_TeamLEGANÉS -4.066e-16 6.948e-15 -5.900e-02 0.95334
## Home_TeamLEVANTE 2.158e-15 6.552e-15 3.290e-01 0.74197
## Home_TeamMÁLAGA -1.660e-14 6.596e-15 -2.516e+00 0.01196 *
## Home_TeamOSASUNA 2.389e-15 9.920e-15 2.410e-01 0.80971
## Home_TeamRAYO VALLECANO -3.237e-15 7.192e-15 -4.500e-01 0.65270
## Home_TeamREAL BETIS 4.135e-16 6.739e-15 6.100e-02 0.95108
## Home_TeamREAL MADRID 6.779e-15 7.043e-15 9.630e-01 0.33586
## Home_TeamREAL SOCIEDAD 1.897e-15 6.414e-15 2.960e-01 0.76744
## Home_TeamSEVILLA FC -3.735e-16 6.513e-15 -5.700e-02 0.95428
## Home_TeamVALENCIA 1.498e-15 6.384e-15 2.350e-01 0.81450
## Home_TeamVALLADOLID -1.679e-15 9.887e-15 -1.700e-01 0.86514
## Home_TeamVILLARREAL 4.758e-15 6.385e-15 7.450e-01 0.45624
## Away_TeamALMERÍA -1.288e-14 1.002e-14 -1.285e+00 0.19896
## Away_TeamATHLETIC -1.839e-14 6.340e-15 -2.901e+00 0.00376 **
## Away_TeamATLETICO MADRID -8.510e-16 6.390e-15 -1.330e-01 0.89407
## Away_TeamBARCELONA 1.598e-15 7.371e-15 2.170e-01 0.82840
## Away_TeamCELTA -5.035e-15 6.438e-15 -7.820e-01 0.43426
## Away_TeamCÓRDOBA -3.524e-15 1.003e-14 -3.510e-01 0.72545
## Away_TeamDEPORTIVO 1.694e-15 6.631e-15 2.550e-01 0.79841
## Away_TeamEIBAR -3.691e-15 6.388e-15 -5.780e-01 0.56342
## Away_TeamELCHE 9.963e-15 1.001e-14 9.950e-01 0.31972
## Away_TeamESPANYOL -1.720e-15 6.268e-15 -2.740e-01 0.78381
## Away_TeamGETAFE -5.079e-15 6.583e-15 -7.710e-01 0.44051
## Away_TeamGIJÓN -3.523e-15 7.863e-15 -4.480e-01 0.65415
## Away_TeamGIRONA -1.251e-15 7.770e-15 -1.610e-01 0.87207
## Away_TeamGRANADA 4.381e-16 7.111e-15 6.200e-02 0.95088
## Away_TeamHUESCA -4.207e-15 9.780e-15 -4.300e-01 0.66711
## Away_TeamLAS PALMAS -2.423e-15 7.271e-15 -3.330e-01 0.73898
## Away_TeamLEGANÉS -1.153e-15 6.960e-15 -1.660e-01 0.86840
## Away_TeamLEVANTE -1.159e-15 6.523e-15 -1.780e-01 0.85901
## Away_TeamMÁLAGA -1.574e-15 6.602e-15 -2.380e-01 0.81158
## Away_TeamOSASUNA -5.991e-15 9.881e-15 -6.060e-01 0.54436
## Away_TeamRAYO VALLECANO -6.425e-15 7.209e-15 -8.910e-01 0.37290
## Away_TeamREAL BETIS 1.276e-15 6.716e-15 1.900e-01 0.84938
## Away_TeamREAL MADRID -8.781e-15 6.904e-15 -1.272e+00 0.20360
## Away_TeamREAL SOCIEDAD -2.761e-15 6.387e-15 -4.320e-01 0.66556
## Away_TeamSEVILLA FC -1.319e-15 6.386e-15 -2.070e-01 0.83641
## Away_TeamVALENCIA -2.217e-15 6.361e-15 -3.490e-01 0.72748
## Away_TeamVALLADOLID -7.113e-15 9.836e-15 -7.230e-01 0.46965
## Away_TeamVILLARREAL 4.183e-16 6.355e-15 6.600e-02 0.94753
## `Home_Team_Possession_%` -2.390e-16 3.194e-16 -7.480e-01 0.45432
## `Away_Team_Possession_%` NA NA NA NA
## Home_Team_Off_Target_Shots -1.427e-15 4.557e-15 -3.130e-01 0.75419
## Home_Team_On_Target_Shots -4.835e-16 4.556e-15 -1.060e-01 0.91549
## Home_Team_Total_Shots 9.353e-16 4.539e-15 2.060e-01 0.83676
## Home_Team_Blocked_Shots -1.119e-15 4.543e-15 -2.460e-01 0.80537
## Home_Team_Corners 1.000e+00 3.890e-16 2.570e+15 < 2e-16 ***
## Home_Team_Throw_Ins 2.149e-17 1.704e-16 1.260e-01 0.89963
## `Home_Team_Pass_Success_%` 3.861e-16 3.390e-16 1.139e+00 0.25490
## Home_Team_Aerials_Won 9.365e-17 1.798e-16 5.210e-01 0.60248
## Home_Team_Clearances -6.941e-17 1.481e-16 -4.690e-01 0.63945
## Home_Team_Fouls 3.296e-16 2.485e-16 1.326e+00 0.18495
## Home_Team_Yellow_Cards -5.030e-16 6.413e-16 -7.840e-01 0.43293
## Home_Team_Second_Yellow_Cards -3.302e-16 3.582e-15 -9.200e-02 0.92656
## Home_Team_Red_Cards -3.778e-14 4.097e-15 -9.220e+00 < 2e-16 ***
## Away_Team_Off_Target_Shots -1.554e-15 3.882e-15 -4.000e-01 0.68905
## Away_Team_On_Target_Shots -2.785e-15 3.904e-15 -7.130e-01 0.47564
## Away_Team_Total_Shots 1.923e-15 3.870e-15 4.970e-01 0.61932
## Away_Team_Blocked_Shots -1.652e-15 3.899e-15 -4.240e-01 0.67174
## Away_Team_Corners 1.000e+00 4.222e-16 2.368e+15 < 2e-16 ***
## Away_Team_Throw_Ins 5.750e-17 1.804e-16 3.190e-01 0.74998
## `Away_Team_Pass_Success_%` -3.842e-16 3.184e-16 -1.207e+00 0.22777
## Away_Team_Aerials_Won 3.628e-18 1.811e-16 2.000e-02 0.98402
## Away_Team_Clearances 1.068e-16 1.393e-16 7.670e-01 0.44308
## Away_Team_Fouls 3.844e-16 2.451e-16 1.569e+00 0.11690
## Away_Team_Yellow_Cards -3.443e-16 6.449e-16 -5.340e-01 0.59342
## Away_Team_Second_Yellow_Cards 2.117e-15 3.120e-15 6.780e-01 0.49755
## Away_Team_Red_Cards 3.924e-15 3.877e-15 1.012e+00 0.31164
## Home_Team_Goals_Scored 9.929e-16 1.099e-15 9.040e-01 0.36620
## Away_Team_Goals_Scored 9.332e-16 1.247e-15 7.480e-01 0.45435
## year -2.438e-13 1.150e-13 -2.120e+00 0.03417 *
## scorex 5.635e-15 2.815e-15 2.002e+00 0.04543 *
## score2 6.302e-15 3.959e-15 1.592e+00 0.11159
## goals NA NA NA NA
## home_points NA NA NA NA
## away_points NA NA NA NA
## jornada -6.308e-15 3.027e-15 -2.084e+00 0.03734 *
## total_off_target_shots NA NA NA NA
## total_on_target_shots NA NA NA NA
## total_shots NA NA NA NA
## total_blocked_shots NA NA NA NA
## total_throw_ins NA NA NA NA
## total_pass_success NA NA NA NA
## total_aerials_won NA NA NA NA
## total_clearances NA NA NA NA
## total_fouls NA NA NA NA
## total_yellow_cards NA NA NA NA
## total_second_yellow_cards NA NA NA NA
## total_red_cards NA NA NA NA
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 3.652e-14 on 1809 degrees of freedom
## Multiple R-squared: 1, Adjusted R-squared: 1
## F-statistic: 1.824e+29 on 90 and 1809 DF, p-value: < 2.2e-16
TOTAL CENTROS
lm_centros <- lm(total_throw_ins~., data = train)
summary(lm_centros)##
## Call:
## lm(formula = total_throw_ins ~ ., data = train)
##
## Residuals:
## Min 1Q Median 3Q Max
## -2.280e-12 -9.540e-15 -2.420e-15 5.650e-15 3.909e-13
##
## Coefficients: (16 not defined because of singularities)
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 7.337e-10 3.710e-10 1.978e+00 0.048119 *
## ...1 9.601e-16 4.847e-16 1.981e+00 0.047731 *
## Home_TeamALMERÍA -2.433e-15 1.603e-14 -1.520e-01 0.879402
## Home_TeamATHLETIC -3.176e-15 1.015e-14 -3.130e-01 0.754456
## Home_TeamATLETICO MADRID 2.982e-15 1.027e-14 2.900e-01 0.771540
## Home_TeamBARCELONA 6.938e-15 1.176e-14 5.900e-01 0.555267
## Home_TeamCELTA 3.439e-15 1.041e-14 3.300e-01 0.741073
## Home_TeamCÓRDOBA -1.059e-15 1.603e-14 -6.600e-02 0.947326
## Home_TeamDEPORTIVO -1.668e-15 1.057e-14 -1.580e-01 0.874657
## Home_TeamEIBAR -1.429e-14 1.036e-14 -1.380e+00 0.167799
## Home_TeamELCHE -4.988e-14 1.608e-14 -3.103e+00 0.001948 **
## Home_TeamESPANYOL 8.764e-16 1.002e-14 8.700e-02 0.930293
## Home_TeamGETAFE 1.200e-14 1.056e-14 1.136e+00 0.255915
## Home_TeamGIJÓN 6.904e-15 1.266e-14 5.450e-01 0.585610
## Home_TeamGIRONA -4.854e-15 1.248e-14 -3.890e-01 0.697240
## Home_TeamGRANADA -8.278e-16 1.134e-14 -7.300e-02 0.941791
## Home_TeamHUESCA -1.665e-14 1.574e-14 -1.058e+00 0.290305
## Home_TeamLAS PALMAS 1.564e-15 1.181e-14 1.330e-01 0.894595
## Home_TeamLEGANÉS -7.425e-15 1.112e-14 -6.670e-01 0.504599
## Home_TeamLEVANTE 7.679e-15 1.049e-14 7.320e-01 0.464282
## Home_TeamMÁLAGA -2.075e-14 1.056e-14 -1.965e+00 0.049597 *
## Home_TeamOSASUNA -1.223e-14 1.588e-14 -7.700e-01 0.441229
## Home_TeamRAYO VALLECANO 3.215e-14 1.152e-14 2.792e+00 0.005293 **
## Home_TeamREAL BETIS 5.648e-15 1.079e-14 5.230e-01 0.600719
## Home_TeamREAL MADRID 2.051e-14 1.128e-14 1.819e+00 0.069030 .
## Home_TeamREAL SOCIEDAD -7.991e-15 1.027e-14 -7.780e-01 0.436598
## Home_TeamSEVILLA FC 2.267e-15 1.043e-14 2.170e-01 0.827943
## Home_TeamVALENCIA 1.388e-14 1.022e-14 1.358e+00 0.174586
## Home_TeamVALLADOLID -2.647e-15 1.583e-14 -1.670e-01 0.867229
## Home_TeamVILLARREAL 8.845e-15 1.022e-14 8.650e-01 0.387095
## Away_TeamALMERÍA 7.102e-15 1.605e-14 4.430e-01 0.658144
## Away_TeamATHLETIC -3.985e-14 1.015e-14 -3.926e+00 8.96e-05 ***
## Away_TeamATLETICO MADRID 4.153e-15 1.023e-14 4.060e-01 0.684887
## Away_TeamBARCELONA 6.809e-15 1.180e-14 5.770e-01 0.564078
## Away_TeamCELTA -3.096e-15 1.031e-14 -3.000e-01 0.763995
## Away_TeamCÓRDOBA 2.390e-14 1.607e-14 1.488e+00 0.137053
## Away_TeamDEPORTIVO 5.769e-15 1.062e-14 5.430e-01 0.586943
## Away_TeamEIBAR 3.010e-15 1.023e-14 2.940e-01 0.768565
## Away_TeamELCHE 1.837e-14 1.603e-14 1.146e+00 0.251848
## Away_TeamESPANYOL 6.512e-15 1.004e-14 6.490e-01 0.516530
## Away_TeamGETAFE -3.079e-15 1.054e-14 -2.920e-01 0.770238
## Away_TeamGIJÓN -1.673e-14 1.259e-14 -1.329e+00 0.184085
## Away_TeamGIRONA 5.219e-15 1.244e-14 4.190e-01 0.674909
## Away_TeamGRANADA -2.750e-17 1.139e-14 -2.000e-03 0.998073
## Away_TeamHUESCA -1.142e-14 1.566e-14 -7.290e-01 0.465996
## Away_TeamLAS PALMAS 5.371e-16 1.164e-14 4.600e-02 0.963212
## Away_TeamLEGANÉS 2.244e-16 1.114e-14 2.000e-02 0.983938
## Away_TeamLEVANTE 1.227e-14 1.044e-14 1.174e+00 0.240359
## Away_TeamMÁLAGA -8.820e-15 1.057e-14 -8.340e-01 0.404193
## Away_TeamOSASUNA 5.926e-15 1.582e-14 3.750e-01 0.708027
## Away_TeamRAYO VALLECANO 3.685e-15 1.154e-14 3.190e-01 0.749547
## Away_TeamREAL BETIS -4.916e-16 1.075e-14 -4.600e-02 0.963542
## Away_TeamREAL MADRID -9.112e-15 1.105e-14 -8.240e-01 0.409911
## Away_TeamREAL SOCIEDAD 2.334e-16 1.023e-14 2.300e-02 0.981796
## Away_TeamSEVILLA FC 7.157e-15 1.023e-14 7.000e-01 0.484065
## Away_TeamVALENCIA 2.165e-15 1.018e-14 2.130e-01 0.831677
## Away_TeamVALLADOLID -9.711e-16 1.575e-14 -6.200e-02 0.950836
## Away_TeamVILLARREAL 2.597e-15 1.018e-14 2.550e-01 0.798573
## `Home_Team_Possession_%` -4.307e-16 5.114e-16 -8.420e-01 0.399749
## `Away_Team_Possession_%` NA NA NA NA
## Home_Team_Off_Target_Shots 6.592e-17 7.297e-15 9.000e-03 0.992794
## Home_Team_On_Target_Shots 3.975e-18 7.295e-15 1.000e-03 0.999565
## Home_Team_Total_Shots -1.031e-15 7.267e-15 -1.420e-01 0.887182
## Home_Team_Blocked_Shots 1.773e-17 7.274e-15 2.000e-03 0.998056
## Home_Team_Corners -3.547e-16 6.229e-16 -5.690e-01 0.569105
## Home_Team_Throw_Ins 1.000e+00 2.728e-16 3.666e+15 < 2e-16 ***
## `Home_Team_Pass_Success_%` 3.801e-16 5.428e-16 7.000e-01 0.483784
## Home_Team_Aerials_Won 2.200e-16 2.878e-16 7.640e-01 0.444887
## Home_Team_Clearances 8.674e-16 2.372e-16 3.657e+00 0.000263 ***
## Home_Team_Fouls -4.307e-18 3.979e-16 -1.100e-02 0.991366
## Home_Team_Yellow_Cards -1.069e-15 1.027e-15 -1.041e+00 0.297824
## Home_Team_Second_Yellow_Cards -3.452e-15 5.736e-15 -6.020e-01 0.547325
## Home_Team_Red_Cards -6.657e-14 6.560e-15 -1.015e+01 < 2e-16 ***
## Away_Team_Off_Target_Shots 1.157e-15 6.216e-15 1.860e-01 0.852385
## Away_Team_On_Target_Shots 6.803e-16 6.251e-15 1.090e-01 0.913349
## Away_Team_Total_Shots -1.499e-15 6.196e-15 -2.420e-01 0.808858
## Away_Team_Blocked_Shots 1.766e-15 6.242e-15 2.830e-01 0.777343
## Away_Team_Corners -3.248e-16 6.761e-16 -4.800e-01 0.630999
## Away_Team_Throw_Ins 1.000e+00 2.889e-16 3.461e+15 < 2e-16 ***
## `Away_Team_Pass_Success_%` -4.958e-16 5.098e-16 -9.720e-01 0.330968
## Away_Team_Aerials_Won 4.267e-18 2.900e-16 1.500e-02 0.988261
## Away_Team_Clearances -2.780e-17 2.230e-16 -1.250e-01 0.900792
## Away_Team_Fouls 6.387e-16 3.924e-16 1.628e+00 0.103779
## Away_Team_Yellow_Cards -6.229e-16 1.033e-15 -6.030e-01 0.546395
## Away_Team_Second_Yellow_Cards 2.097e-15 4.996e-15 4.200e-01 0.674777
## Away_Team_Red_Cards 6.802e-15 6.208e-15 1.096e+00 0.273354
## Home_Team_Goals_Scored 1.453e-15 1.759e-15 8.260e-01 0.408777
## Away_Team_Goals_Scored 1.033e-15 1.997e-15 5.170e-01 0.604897
## year -3.643e-13 1.842e-13 -1.978e+00 0.048108 *
## scorex 7.890e-15 4.507e-15 1.751e+00 0.080187 .
## score2 9.934e-15 6.338e-15 1.567e+00 0.117220
## goals NA NA NA NA
## home_points NA NA NA NA
## away_points NA NA NA NA
## jornada -9.459e-15 4.847e-15 -1.951e+00 0.051175 .
## total_off_target_shots NA NA NA NA
## total_on_target_shots NA NA NA NA
## total_shots NA NA NA NA
## total_blocked_shots NA NA NA NA
## total_corners NA NA NA NA
## total_pass_success NA NA NA NA
## total_aerials_won NA NA NA NA
## total_clearances NA NA NA NA
## total_fouls NA NA NA NA
## total_yellow_cards NA NA NA NA
## total_second_yellow_cards NA NA NA NA
## total_red_cards NA NA NA NA
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 5.848e-14 on 1809 degrees of freedom
## Multiple R-squared: 1, Adjusted R-squared: 1
## F-statistic: 6.837e+29 on 90 and 1809 DF, p-value: < 2.2e-16
TOTAL DUELOS AEREOS GANADOS
lm_d_aereos <- lm(total_aerials_won~., data = train)
summary(lm_d_aereos)##
## Call:
## lm(formula = total_aerials_won ~ ., data = train)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.036e-13 -3.407e-15 4.580e-16 4.375e-15 3.135e-13
##
## Coefficients: (16 not defined because of singularities)
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 1.220e-11 1.164e-10 1.050e-01 0.916586
## ...1 2.267e-17 1.521e-16 1.490e-01 0.881575
## Home_TeamALMERÍA 9.511e-15 5.033e-15 1.890e+00 0.058945 .
## Home_TeamATHLETIC 4.336e-14 3.186e-15 1.361e+01 < 2e-16 ***
## Home_TeamATLETICO MADRID 1.425e-14 3.223e-15 4.420e+00 1.04e-05 ***
## Home_TeamBARCELONA 2.209e-14 3.691e-15 5.984e+00 2.62e-09 ***
## Home_TeamCELTA 1.161e-14 3.266e-15 3.554e+00 0.000389 ***
## Home_TeamCÓRDOBA 5.962e-16 5.030e-15 1.190e-01 0.905661
## Home_TeamDEPORTIVO -3.724e-16 3.318e-15 -1.120e-01 0.910643
## Home_TeamEIBAR 1.116e-14 3.251e-15 3.433e+00 0.000611 ***
## Home_TeamELCHE 1.055e-14 5.046e-15 2.091e+00 0.036633 *
## Home_TeamESPANYOL 1.049e-14 3.144e-15 3.336e+00 0.000869 ***
## Home_TeamGETAFE -3.108e-15 3.314e-15 -9.380e-01 0.348486
## Home_TeamGIJÓN 1.089e-14 3.974e-15 2.740e+00 0.006197 **
## Home_TeamGIRONA 1.006e-14 3.916e-15 2.568e+00 0.010294 *
## Home_TeamGRANADA -6.193e-15 3.558e-15 -1.741e+00 0.081895 .
## Home_TeamHUESCA 8.628e-15 4.940e-15 1.747e+00 0.080841 .
## Home_TeamLAS PALMAS -7.080e-15 3.706e-15 -1.911e+00 0.056203 .
## Home_TeamLEGANÉS 8.564e-15 3.492e-15 2.453e+00 0.014270 *
## Home_TeamLEVANTE 1.174e-14 3.293e-15 3.564e+00 0.000374 ***
## Home_TeamMÁLAGA 1.196e-14 3.315e-15 3.607e+00 0.000318 ***
## Home_TeamOSASUNA 1.118e-14 4.985e-15 2.243e+00 0.025033 *
## Home_TeamRAYO VALLECANO 2.086e-15 3.614e-15 5.770e-01 0.563905
## Home_TeamREAL BETIS 5.649e-15 3.387e-15 1.668e+00 0.095472 .
## Home_TeamREAL MADRID -1.009e-14 3.539e-15 -2.850e+00 0.004422 **
## Home_TeamREAL SOCIEDAD 2.757e-15 3.223e-15 8.550e-01 0.392582
## Home_TeamSEVILLA FC 7.099e-15 3.273e-15 2.169e+00 0.030231 *
## Home_TeamVALENCIA 2.914e-15 3.208e-15 9.080e-01 0.363826
## Home_TeamVALLADOLID -1.914e-14 4.969e-15 -3.851e+00 0.000122 ***
## Home_TeamVILLARREAL 8.635e-15 3.209e-15 2.691e+00 0.007191 **
## Away_TeamALMERÍA 7.394e-15 5.037e-15 1.468e+00 0.142303
## Away_TeamATHLETIC 2.326e-14 3.186e-15 7.300e+00 4.28e-13 ***
## Away_TeamATLETICO MADRID -1.029e-15 3.212e-15 -3.200e-01 0.748711
## Away_TeamBARCELONA 6.940e-16 3.704e-15 1.870e-01 0.851416
## Away_TeamCELTA 2.813e-15 3.236e-15 8.690e-01 0.384704
## Away_TeamCÓRDOBA 1.167e-14 5.042e-15 2.315e+00 0.020746 *
## Away_TeamDEPORTIVO -7.161e-15 3.332e-15 -2.149e+00 0.031775 *
## Away_TeamEIBAR -2.901e-15 3.210e-15 -9.040e-01 0.366355
## Away_TeamELCHE 1.130e-14 5.031e-15 2.247e+00 0.024787 *
## Away_TeamESPANYOL -6.963e-15 3.150e-15 -2.210e+00 0.027201 *
## Away_TeamGETAFE 7.665e-15 3.308e-15 2.317e+00 0.020610 *
## Away_TeamGIJÓN -1.445e-15 3.951e-15 -3.660e-01 0.714582
## Away_TeamGIRONA -5.004e-15 3.905e-15 -1.281e+00 0.200192
## Away_TeamGRANADA -9.161e-15 3.573e-15 -2.564e+00 0.010437 *
## Away_TeamHUESCA 2.805e-14 4.915e-15 5.706e+00 1.35e-08 ***
## Away_TeamLAS PALMAS -1.074e-14 3.654e-15 -2.940e+00 0.003327 **
## Away_TeamLEGANÉS 1.840e-15 3.498e-15 5.260e-01 0.598905
## Away_TeamLEVANTE 1.411e-14 3.278e-15 4.305e+00 1.76e-05 ***
## Away_TeamMÁLAGA -8.507e-16 3.318e-15 -2.560e-01 0.797682
## Away_TeamOSASUNA -6.639e-15 4.966e-15 -1.337e+00 0.181371
## Away_TeamRAYO VALLECANO -5.577e-17 3.623e-15 -1.500e-02 0.987719
## Away_TeamREAL BETIS -5.006e-15 3.375e-15 -1.483e+00 0.138218
## Away_TeamREAL MADRID -1.214e-14 3.470e-15 -3.500e+00 0.000477 ***
## Away_TeamREAL SOCIEDAD -4.156e-15 3.210e-15 -1.295e+00 0.195544
## Away_TeamSEVILLA FC 6.273e-15 3.210e-15 1.954e+00 0.050814 .
## Away_TeamVALENCIA -6.960e-15 3.197e-15 -2.177e+00 0.029590 *
## Away_TeamVALLADOLID 1.061e-14 4.943e-15 2.146e+00 0.032000 *
## Away_TeamVILLARREAL -5.751e-15 3.194e-15 -1.800e+00 0.071952 .
## `Home_Team_Possession_%` 5.909e-17 1.605e-16 3.680e-01 0.712819
## `Away_Team_Possession_%` NA NA NA NA
## Home_Team_Off_Target_Shots -4.932e-15 2.290e-15 -2.153e+00 0.031427 *
## Home_Team_On_Target_Shots -4.756e-15 2.290e-15 -2.077e+00 0.037929 *
## Home_Team_Total_Shots 4.635e-15 2.281e-15 2.032e+00 0.042309 *
## Home_Team_Blocked_Shots -4.694e-15 2.283e-15 -2.056e+00 0.039903 *
## Home_Team_Corners 4.174e-16 1.955e-16 2.135e+00 0.032920 *
## Home_Team_Throw_Ins 1.287e-15 8.561e-17 1.503e+01 < 2e-16 ***
## `Home_Team_Pass_Success_%` -1.709e-16 1.704e-16 -1.003e+00 0.316043
## Home_Team_Aerials_Won 1.000e+00 9.035e-17 1.107e+16 < 2e-16 ***
## Home_Team_Clearances -1.209e-16 7.445e-17 -1.623e+00 0.104678
## Home_Team_Fouls 1.758e-16 1.249e-16 1.408e+00 0.159448
## Home_Team_Yellow_Cards -5.161e-16 3.223e-16 -1.601e+00 0.109485
## Home_Team_Second_Yellow_Cards 1.774e-15 1.800e-15 9.850e-01 0.324596
## Home_Team_Red_Cards 9.524e-15 2.059e-15 4.625e+00 4.00e-06 ***
## Away_Team_Off_Target_Shots 9.924e-17 1.951e-15 5.100e-02 0.959441
## Away_Team_On_Target_Shots 2.343e-16 1.962e-15 1.190e-01 0.904956
## Away_Team_Total_Shots -7.449e-17 1.945e-15 -3.800e-02 0.969453
## Away_Team_Blocked_Shots -3.029e-16 1.959e-15 -1.550e-01 0.877163
## Away_Team_Corners 4.858e-16 2.122e-16 2.290e+00 0.022164 *
## Away_Team_Throw_Ins -6.124e-18 9.068e-17 -6.800e-02 0.946165
## `Away_Team_Pass_Success_%` 1.510e-16 1.600e-16 9.440e-01 0.345477
## Away_Team_Aerials_Won 1.000e+00 9.101e-17 1.099e+16 < 2e-16 ***
## Away_Team_Clearances 8.550e-17 6.999e-17 1.222e+00 0.222025
## Away_Team_Fouls -3.237e-17 1.232e-16 -2.630e-01 0.792722
## Away_Team_Yellow_Cards 2.401e-16 3.241e-16 7.410e-01 0.458833
## Away_Team_Second_Yellow_Cards -7.399e-16 1.568e-15 -4.720e-01 0.637061
## Away_Team_Red_Cards -1.582e-15 1.949e-15 -8.120e-01 0.416923
## Home_Team_Goals_Scored -5.313e-17 5.521e-16 -9.600e-02 0.923342
## Away_Team_Goals_Scored -4.675e-16 6.267e-16 -7.460e-01 0.455829
## year -6.060e-15 5.781e-14 -1.050e-01 0.916536
## scorex -1.539e-15 1.415e-15 -1.088e+00 0.276831
## score2 -1.163e-15 1.989e-15 -5.850e-01 0.558837
## goals NA NA NA NA
## home_points NA NA NA NA
## away_points NA NA NA NA
## jornada -1.422e-16 1.521e-15 -9.300e-02 0.925545
## total_off_target_shots NA NA NA NA
## total_on_target_shots NA NA NA NA
## total_shots NA NA NA NA
## total_blocked_shots NA NA NA NA
## total_corners NA NA NA NA
## total_throw_ins NA NA NA NA
## total_pass_success NA NA NA NA
## total_clearances NA NA NA NA
## total_fouls NA NA NA NA
## total_yellow_cards NA NA NA NA
## total_second_yellow_cards NA NA NA NA
## total_red_cards NA NA NA NA
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1.835e-14 on 1809 degrees of freedom
## Multiple R-squared: 1, Adjusted R-squared: 1
## F-statistic: 9.961e+30 on 90 and 1809 DF, p-value: < 2.2e-16
TOTAL DESPEJES
lm_despejes <- lm(total_clearances~., data = train)
summary(lm_despejes)##
## Call:
## lm(formula = total_clearances ~ ., data = train)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.033e-12 -5.630e-15 -7.700e-16 5.030e-15 2.339e-13
##
## Coefficients: (16 not defined because of singularities)
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 3.133e-10 1.875e-10 1.671e+00 0.094908 .
## ...1 4.060e-16 2.450e-16 1.657e+00 0.097642 .
## Home_TeamALMERÍA 2.366e-14 8.105e-15 2.919e+00 0.003558 **
## Home_TeamATHLETIC 1.861e-15 5.132e-15 3.630e-01 0.716956
## Home_TeamATLETICO MADRID -5.593e-15 5.191e-15 -1.077e+00 0.281453
## Home_TeamBARCELONA 6.029e-16 5.945e-15 1.010e-01 0.919225
## Home_TeamCELTA -4.748e-16 5.260e-15 -9.000e-02 0.928082
## Home_TeamCÓRDOBA -9.280e-15 8.101e-15 -1.145e+00 0.252170
## Home_TeamDEPORTIVO -1.079e-14 5.344e-15 -2.019e+00 0.043674 *
## Home_TeamEIBAR 5.424e-15 5.236e-15 1.036e+00 0.300369
## Home_TeamELCHE -1.100e-14 8.127e-15 -1.354e+00 0.175879
## Home_TeamESPANYOL -8.289e-15 5.064e-15 -1.637e+00 0.101821
## Home_TeamGETAFE 1.076e-14 5.337e-15 2.017e+00 0.043833 *
## Home_TeamGIJÓN 5.063e-15 6.400e-15 7.910e-01 0.428978
## Home_TeamGIRONA -7.330e-15 6.306e-15 -1.162e+00 0.245273
## Home_TeamGRANADA -7.141e-15 5.730e-15 -1.246e+00 0.212851
## Home_TeamHUESCA 1.037e-15 7.955e-15 1.300e-01 0.896261
## Home_TeamLAS PALMAS -2.094e-14 5.968e-15 -3.509e+00 0.000461 ***
## Home_TeamLEGANÉS 4.306e-15 5.623e-15 7.660e-01 0.443923
## Home_TeamLEVANTE -1.335e-14 5.303e-15 -2.517e+00 0.011907 *
## Home_TeamMÁLAGA -2.163e-14 5.339e-15 -4.052e+00 5.29e-05 ***
## Home_TeamOSASUNA 9.034e-15 8.029e-15 1.125e+00 0.260621
## Home_TeamRAYO VALLECANO -2.745e-15 5.821e-15 -4.720e-01 0.637336
## Home_TeamREAL BETIS -9.782e-15 5.454e-15 -1.793e+00 0.073082 .
## Home_TeamREAL MADRID 1.500e-15 5.700e-15 2.630e-01 0.792434
## Home_TeamREAL SOCIEDAD -1.102e-14 5.191e-15 -2.122e+00 0.033968 *
## Home_TeamSEVILLA FC -1.269e-14 5.272e-15 -2.407e+00 0.016163 *
## Home_TeamVALENCIA -1.026e-14 5.167e-15 -1.986e+00 0.047189 *
## Home_TeamVALLADOLID -4.850e-15 8.002e-15 -6.060e-01 0.544536
## Home_TeamVILLARREAL -8.271e-15 5.168e-15 -1.600e+00 0.109690
## Away_TeamALMERÍA 2.660e-14 8.112e-15 3.278e+00 0.001064 **
## Away_TeamATHLETIC -6.507e-15 5.131e-15 -1.268e+00 0.204920
## Away_TeamATLETICO MADRID 1.005e-15 5.172e-15 1.940e-01 0.845950
## Away_TeamBARCELONA -1.699e-14 5.966e-15 -2.848e+00 0.004445 **
## Away_TeamCELTA 9.437e-15 5.211e-15 1.811e+00 0.070311 .
## Away_TeamCÓRDOBA 2.978e-15 8.121e-15 3.670e-01 0.713836
## Away_TeamDEPORTIVO 5.506e-15 5.367e-15 1.026e+00 0.305079
## Away_TeamEIBAR -1.645e-16 5.170e-15 -3.200e-02 0.974625
## Away_TeamELCHE 3.453e-15 8.102e-15 4.260e-01 0.670000
## Away_TeamESPANYOL -2.966e-15 5.073e-15 -5.850e-01 0.558889
## Away_TeamGETAFE 6.708e-15 5.328e-15 1.259e+00 0.208172
## Away_TeamGIJÓN -2.788e-15 6.364e-15 -4.380e-01 0.661364
## Away_TeamGIRONA -2.493e-15 6.289e-15 -3.960e-01 0.691827
## Away_TeamGRANADA 1.231e-14 5.755e-15 2.139e+00 0.032570 *
## Away_TeamHUESCA -3.996e-15 7.916e-15 -5.050e-01 0.613777
## Away_TeamLAS PALMAS 1.324e-14 5.885e-15 2.250e+00 0.024572 *
## Away_TeamLEGANÉS -6.859e-15 5.633e-15 -1.217e+00 0.223582
## Away_TeamLEVANTE -7.091e-16 5.280e-15 -1.340e-01 0.893176
## Away_TeamMÁLAGA 1.231e-14 5.344e-15 2.303e+00 0.021404 *
## Away_TeamOSASUNA 8.446e-15 7.997e-15 1.056e+00 0.291077
## Away_TeamRAYO VALLECANO 1.413e-14 5.835e-15 2.422e+00 0.015544 *
## Away_TeamREAL BETIS 4.569e-15 5.436e-15 8.410e-01 0.400706
## Away_TeamREAL MADRID 3.411e-15 5.588e-15 6.100e-01 0.541663
## Away_TeamREAL SOCIEDAD 6.155e-15 5.169e-15 1.191e+00 0.233949
## Away_TeamSEVILLA FC 1.250e-16 5.169e-15 2.400e-02 0.980703
## Away_TeamVALENCIA -1.650e-15 5.148e-15 -3.210e-01 0.748580
## Away_TeamVALLADOLID 5.126e-15 7.961e-15 6.440e-01 0.519753
## Away_TeamVILLARREAL 2.764e-15 5.144e-15 5.370e-01 0.591135
## `Home_Team_Possession_%` -3.091e-18 2.585e-16 -1.200e-02 0.990459
## `Away_Team_Possession_%` NA NA NA NA
## Home_Team_Off_Target_Shots -3.233e-15 3.689e-15 -8.760e-01 0.380914
## Home_Team_On_Target_Shots -2.529e-15 3.688e-15 -6.860e-01 0.492965
## Home_Team_Total_Shots 2.499e-15 3.673e-15 6.800e-01 0.496489
## Home_Team_Blocked_Shots -4.639e-15 3.677e-15 -1.262e+00 0.207255
## Home_Team_Corners -8.315e-17 3.149e-16 -2.640e-01 0.791761
## Home_Team_Throw_Ins -1.117e-16 1.379e-16 -8.100e-01 0.418143
## `Home_Team_Pass_Success_%` 1.403e-15 2.744e-16 5.114e+00 3.48e-07 ***
## Home_Team_Aerials_Won -5.558e-16 1.455e-16 -3.820e+00 0.000138 ***
## Home_Team_Clearances 1.000e+00 1.199e-16 8.340e+15 < 2e-16 ***
## Home_Team_Fouls 1.501e-16 2.012e-16 7.460e-01 0.455782
## Home_Team_Yellow_Cards -1.595e-16 5.190e-16 -3.070e-01 0.758707
## Home_Team_Second_Yellow_Cards -5.357e-15 2.899e-15 -1.848e+00 0.064822 .
## Home_Team_Red_Cards -2.595e-14 3.316e-15 -7.825e+00 8.57e-15 ***
## Away_Team_Off_Target_Shots -1.867e-16 3.142e-15 -5.900e-02 0.952620
## Away_Team_On_Target_Shots -7.624e-16 3.160e-15 -2.410e-01 0.809359
## Away_Team_Total_Shots 1.044e-16 3.132e-15 3.300e-02 0.973425
## Away_Team_Blocked_Shots 1.475e-16 3.156e-15 4.700e-02 0.962720
## Away_Team_Corners 1.637e-17 3.417e-16 4.800e-02 0.961799
## Away_Team_Throw_Ins 1.339e-16 1.460e-16 9.170e-01 0.359432
## `Away_Team_Pass_Success_%` -2.132e-16 2.577e-16 -8.270e-01 0.408251
## Away_Team_Aerials_Won -2.074e-16 1.466e-16 -1.415e+00 0.157185
## Away_Team_Clearances 1.000e+00 1.127e-16 8.871e+15 < 2e-16 ***
## Away_Team_Fouls 2.554e-16 1.983e-16 1.288e+00 0.198007
## Away_Team_Yellow_Cards -1.467e-16 5.219e-16 -2.810e-01 0.778761
## Away_Team_Second_Yellow_Cards 1.098e-15 2.525e-15 4.350e-01 0.663808
## Away_Team_Red_Cards 3.264e-15 3.138e-15 1.040e+00 0.298508
## Home_Team_Goals_Scored 8.167e-18 8.891e-16 9.000e-03 0.992672
## Away_Team_Goals_Scored 1.498e-15 1.009e-15 1.484e+00 0.137918
## year -1.556e-13 9.311e-14 -1.672e+00 0.094783 .
## scorex 2.929e-15 2.278e-15 1.286e+00 0.198779
## score2 1.310e-15 3.204e-15 4.090e-01 0.682789
## goals NA NA NA NA
## home_points NA NA NA NA
## away_points NA NA NA NA
## jornada -4.104e-15 2.450e-15 -1.675e+00 0.094128 .
## total_off_target_shots NA NA NA NA
## total_on_target_shots NA NA NA NA
## total_shots NA NA NA NA
## total_blocked_shots NA NA NA NA
## total_corners NA NA NA NA
## total_throw_ins NA NA NA NA
## total_pass_success NA NA NA NA
## total_aerials_won NA NA NA NA
## total_fouls NA NA NA NA
## total_yellow_cards NA NA NA NA
## total_second_yellow_cards NA NA NA NA
## total_red_cards NA NA NA NA
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.956e-14 on 1809 degrees of freedom
## Multiple R-squared: 1, Adjusted R-squared: 1
## F-statistic: 3.124e+30 on 90 and 1809 DF, p-value: < 2.2e-16
TOTAL FALTAS
lm_faltas <- lm(total_fouls~., data = train)
summary(lm_faltas)##
## Call:
## lm(formula = total_fouls ~ ., data = train)
##
## Residuals:
## Min 1Q Median 3Q Max
## -4.226e-13 -4.040e-15 2.900e-16 4.300e-15 9.321e-13
##
## Coefficients: (16 not defined because of singularities)
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -1.559e-13 1.770e-10 -1.000e-03 0.999298
## ...1 -5.516e-18 2.313e-16 -2.400e-02 0.980977
## Home_TeamALMERÍA -2.273e-14 7.652e-15 -2.970e+00 0.003016 **
## Home_TeamATHLETIC -1.439e-14 4.845e-15 -2.971e+00 0.003007 **
## Home_TeamATLETICO MADRID -1.780e-14 4.901e-15 -3.631e+00 0.000290 ***
## Home_TeamBARCELONA -2.258e-14 5.612e-15 -4.023e+00 5.97e-05 ***
## Home_TeamCELTA -1.614e-14 4.966e-15 -3.251e+00 0.001172 **
## Home_TeamCÓRDOBA -1.134e-14 7.648e-15 -1.483e+00 0.138233
## Home_TeamDEPORTIVO -1.586e-14 5.045e-15 -3.145e+00 0.001690 **
## Home_TeamEIBAR -2.210e-14 4.943e-15 -4.471e+00 8.26e-06 ***
## Home_TeamELCHE -2.132e-14 7.672e-15 -2.779e+00 0.005505 **
## Home_TeamESPANYOL -1.549e-14 4.781e-15 -3.240e+00 0.001218 **
## Home_TeamGETAFE -1.740e-14 5.038e-15 -3.454e+00 0.000566 ***
## Home_TeamGIJÓN -1.017e-14 6.042e-15 -1.684e+00 0.092398 .
## Home_TeamGIRONA -1.928e-14 5.954e-15 -3.239e+00 0.001223 **
## Home_TeamGRANADA -1.339e-14 5.409e-15 -2.476e+00 0.013395 *
## Home_TeamHUESCA -2.967e-14 7.510e-15 -3.950e+00 8.11e-05 ***
## Home_TeamLAS PALMAS -1.232e-14 5.634e-15 -2.187e+00 0.028851 *
## Home_TeamLEGANÉS -1.725e-14 5.309e-15 -3.250e+00 0.001177 **
## Home_TeamLEVANTE -1.700e-14 5.006e-15 -3.395e+00 0.000702 ***
## Home_TeamMÁLAGA -1.128e-14 5.040e-15 -2.237e+00 0.025381 *
## Home_TeamOSASUNA -1.440e-14 7.580e-15 -1.900e+00 0.057634 .
## Home_TeamRAYO VALLECANO -1.940e-14 5.495e-15 -3.531e+00 0.000424 ***
## Home_TeamREAL BETIS -1.280e-14 5.149e-15 -2.486e+00 0.012991 *
## Home_TeamREAL MADRID -1.144e-14 5.381e-15 -2.127e+00 0.033572 *
## Home_TeamREAL SOCIEDAD -1.180e-14 4.901e-15 -2.407e+00 0.016166 *
## Home_TeamSEVILLA FC -2.139e-14 4.977e-15 -4.298e+00 1.81e-05 ***
## Home_TeamVALENCIA -1.702e-14 4.878e-15 -3.489e+00 0.000496 ***
## Home_TeamVALLADOLID -1.095e-14 7.554e-15 -1.450e+00 0.147297
## Home_TeamVILLARREAL -2.869e-14 4.879e-15 -5.881e+00 4.84e-09 ***
## Away_TeamALMERÍA 6.531e-15 7.658e-15 8.530e-01 0.393868
## Away_TeamATHLETIC 1.712e-14 4.844e-15 3.534e+00 0.000419 ***
## Away_TeamATLETICO MADRID 5.529e-15 4.883e-15 1.132e+00 0.257685
## Away_TeamBARCELONA 6.767e-15 5.632e-15 1.201e+00 0.229721
## Away_TeamCELTA 5.049e-15 4.920e-15 1.026e+00 0.304844
## Away_TeamCÓRDOBA 8.298e-15 7.667e-15 1.082e+00 0.279242
## Away_TeamDEPORTIVO 7.887e-15 5.067e-15 1.557e+00 0.119747
## Away_TeamEIBAR 1.607e-14 4.881e-15 3.293e+00 0.001011 **
## Away_TeamELCHE 1.144e-15 7.649e-15 1.500e-01 0.881168
## Away_TeamESPANYOL 7.100e-15 4.789e-15 1.483e+00 0.138379
## Away_TeamGETAFE 1.141e-14 5.030e-15 2.268e+00 0.023438 *
## Away_TeamGIJÓN 3.936e-15 6.008e-15 6.550e-01 0.512419
## Away_TeamGIRONA 1.487e-15 5.937e-15 2.500e-01 0.802263
## Away_TeamGRANADA 1.030e-14 5.433e-15 1.896e+00 0.058088 .
## Away_TeamHUESCA 9.611e-15 7.473e-15 1.286e+00 0.198578
## Away_TeamLAS PALMAS -3.425e-15 5.556e-15 -6.160e-01 0.537713
## Away_TeamLEGANÉS 9.948e-15 5.318e-15 1.870e+00 0.061577 .
## Away_TeamLEVANTE 5.745e-15 4.984e-15 1.153e+00 0.249242
## Away_TeamMÁLAGA 1.216e-14 5.045e-15 2.410e+00 0.016031 *
## Away_TeamOSASUNA 1.030e-15 7.550e-15 1.360e-01 0.891548
## Away_TeamRAYO VALLECANO 1.263e-14 5.508e-15 2.293e+00 0.021977 *
## Away_TeamREAL BETIS -1.901e-15 5.132e-15 -3.700e-01 0.711108
## Away_TeamREAL MADRID 2.188e-15 5.276e-15 4.150e-01 0.678424
## Away_TeamREAL SOCIEDAD 6.678e-15 4.880e-15 1.368e+00 0.171359
## Away_TeamSEVILLA FC 9.817e-15 4.880e-15 2.012e+00 0.044400 *
## Away_TeamVALENCIA 4.498e-16 4.860e-15 9.300e-02 0.926274
## Away_TeamVALLADOLID -1.177e-16 7.516e-15 -1.600e-02 0.987506
## Away_TeamVILLARREAL 6.328e-15 4.856e-15 1.303e+00 0.192704
## `Home_Team_Possession_%` 3.817e-16 2.440e-16 1.564e+00 0.117976
## `Away_Team_Possession_%` NA NA NA NA
## Home_Team_Off_Target_Shots 4.276e-15 3.482e-15 1.228e+00 0.219595
## Home_Team_On_Target_Shots 4.536e-15 3.481e-15 1.303e+00 0.192804
## Home_Team_Total_Shots -4.634e-15 3.468e-15 -1.336e+00 0.181618
## Home_Team_Blocked_Shots 5.050e-15 3.471e-15 1.455e+00 0.145874
## Home_Team_Corners -4.587e-17 2.973e-16 -1.540e-01 0.877373
## Home_Team_Throw_Ins -3.359e-16 1.302e-16 -2.581e+00 0.009940 **
## `Home_Team_Pass_Success_%` -3.906e-17 2.590e-16 -1.510e-01 0.880164
## Home_Team_Aerials_Won 6.816e-18 1.374e-16 5.000e-02 0.960430
## Home_Team_Clearances -6.611e-17 1.132e-16 -5.840e-01 0.559276
## Home_Team_Fouls 1.000e+00 1.899e-16 5.266e+15 < 2e-16 ***
## Home_Team_Yellow_Cards 2.680e-16 4.900e-16 5.470e-01 0.584430
## Home_Team_Second_Yellow_Cards -1.019e-15 2.737e-15 -3.720e-01 0.709701
## Home_Team_Red_Cards 2.430e-14 3.130e-15 7.761e+00 1.40e-14 ***
## Away_Team_Off_Target_Shots 9.189e-18 2.967e-15 3.000e-03 0.997529
## Away_Team_On_Target_Shots 9.693e-16 2.983e-15 3.250e-01 0.745254
## Away_Team_Total_Shots -9.212e-16 2.957e-15 -3.120e-01 0.755434
## Away_Team_Blocked_Shots 9.998e-16 2.979e-15 3.360e-01 0.737206
## Away_Team_Corners -1.092e-16 3.226e-16 -3.380e-01 0.735128
## Away_Team_Throw_Ins -1.984e-16 1.379e-16 -1.439e+00 0.150359
## `Away_Team_Pass_Success_%` -2.053e-16 2.433e-16 -8.440e-01 0.398932
## Away_Team_Aerials_Won -1.945e-17 1.384e-16 -1.410e-01 0.888231
## Away_Team_Clearances 3.513e-17 1.064e-16 3.300e-01 0.741332
## Away_Team_Fouls 1.000e+00 1.873e-16 5.340e+15 < 2e-16 ***
## Away_Team_Yellow_Cards 5.130e-16 4.927e-16 1.041e+00 0.297916
## Away_Team_Second_Yellow_Cards -7.755e-16 2.384e-15 -3.250e-01 0.745018
## Away_Team_Red_Cards -1.773e-15 2.963e-15 -5.980e-01 0.549637
## Home_Team_Goals_Scored -4.531e-16 8.394e-16 -5.400e-01 0.589358
## Away_Team_Goals_Scored -9.642e-16 9.529e-16 -1.012e+00 0.311739
## year 1.087e-16 8.790e-14 1.000e-03 0.999013
## scorex -3.119e-15 2.151e-15 -1.450e+00 0.147184
## score2 -6.033e-15 3.025e-15 -1.994e+00 0.046253 *
## goals NA NA NA NA
## home_points NA NA NA NA
## away_points NA NA NA NA
## jornada -6.141e-17 2.313e-15 -2.700e-02 0.978826
## total_off_target_shots NA NA NA NA
## total_on_target_shots NA NA NA NA
## total_shots NA NA NA NA
## total_blocked_shots NA NA NA NA
## total_corners NA NA NA NA
## total_throw_ins NA NA NA NA
## total_pass_success NA NA NA NA
## total_aerials_won NA NA NA NA
## total_clearances NA NA NA NA
## total_yellow_cards NA NA NA NA
## total_second_yellow_cards NA NA NA NA
## total_red_cards NA NA NA NA
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.791e-14 on 1809 degrees of freedom
## Multiple R-squared: 1, Adjusted R-squared: 1
## F-statistic: 9.555e+29 on 90 and 1809 DF, p-value: < 2.2e-16
TOTAL TARJETAS AMARILLAS
lm_amarillas <- lm(total_yellow_cards~., data = train)
summary(lm_amarillas)##
## Call:
## lm(formula = total_yellow_cards ~ ., data = train)
##
## Residuals:
## Min 1Q Median 3Q Max
## -2.563e-12 -8.620e-15 -2.000e-15 4.990e-15 1.464e-13
##
## Coefficients: (16 not defined because of singularities)
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 9.087e-10 3.997e-10 2.273e+00 0.02313 *
## ...1 1.194e-15 5.222e-16 2.286e+00 0.02238 *
## Home_TeamALMERÍA 1.101e-14 1.728e-14 6.370e-01 0.52397
## Home_TeamATHLETIC 2.676e-15 1.094e-14 2.450e-01 0.80674
## Home_TeamATLETICO MADRID 3.812e-15 1.107e-14 3.440e-01 0.73055
## Home_TeamBARCELONA 1.015e-14 1.267e-14 8.010e-01 0.42337
## Home_TeamCELTA 4.568e-15 1.121e-14 4.070e-01 0.68374
## Home_TeamCÓRDOBA -2.254e-15 1.727e-14 -1.310e-01 0.89616
## Home_TeamDEPORTIVO 2.257e-15 1.139e-14 1.980e-01 0.84293
## Home_TeamEIBAR 3.347e-15 1.116e-14 3.000e-01 0.76427
## Home_TeamELCHE 7.084e-15 1.732e-14 4.090e-01 0.68264
## Home_TeamESPANYOL 1.948e-15 1.079e-14 1.800e-01 0.85682
## Home_TeamGETAFE 7.621e-15 1.138e-14 6.700e-01 0.50300
## Home_TeamGIJÓN 6.850e-15 1.364e-14 5.020e-01 0.61564
## Home_TeamGIRONA -3.779e-15 1.344e-14 -2.810e-01 0.77866
## Home_TeamGRANADA 6.931e-15 1.221e-14 5.670e-01 0.57049
## Home_TeamHUESCA -1.646e-15 1.696e-14 -9.700e-02 0.92269
## Home_TeamLAS PALMAS 3.376e-15 1.272e-14 2.650e-01 0.79077
## Home_TeamLEGANÉS 9.447e-16 1.199e-14 7.900e-02 0.93719
## Home_TeamLEVANTE 7.795e-15 1.130e-14 6.900e-01 0.49057
## Home_TeamMÁLAGA -2.955e-14 1.138e-14 -2.597e+00 0.00949 **
## Home_TeamOSASUNA 3.193e-15 1.711e-14 1.870e-01 0.85204
## Home_TeamRAYO VALLECANO 7.514e-15 1.241e-14 6.060e-01 0.54487
## Home_TeamREAL BETIS 2.415e-15 1.163e-14 2.080e-01 0.83551
## Home_TeamREAL MADRID 1.015e-14 1.215e-14 8.350e-01 0.40357
## Home_TeamREAL SOCIEDAD 2.598e-15 1.107e-14 2.350e-01 0.81444
## Home_TeamSEVILLA FC 3.864e-15 1.124e-14 3.440e-01 0.73102
## Home_TeamVALENCIA 7.223e-16 1.101e-14 6.600e-02 0.94772
## Home_TeamVALLADOLID -4.767e-15 1.706e-14 -2.790e-01 0.77991
## Home_TeamVILLARREAL 4.461e-15 1.102e-14 4.050e-01 0.68558
## Away_TeamALMERÍA -4.041e-16 1.729e-14 -2.300e-02 0.98136
## Away_TeamATHLETIC -2.652e-14 1.094e-14 -2.425e+00 0.01541 *
## Away_TeamATLETICO MADRID -1.757e-16 1.103e-14 -1.600e-02 0.98729
## Away_TeamBARCELONA 8.580e-15 1.272e-14 6.750e-01 0.50000
## Away_TeamCELTA 1.701e-15 1.111e-14 1.530e-01 0.87833
## Away_TeamCÓRDOBA 6.608e-15 1.731e-14 3.820e-01 0.70270
## Away_TeamDEPORTIVO -1.094e-15 1.144e-14 -9.600e-02 0.92379
## Away_TeamEIBAR 3.314e-15 1.102e-14 3.010e-01 0.76365
## Away_TeamELCHE 7.853e-15 1.727e-14 4.550e-01 0.64939
## Away_TeamESPANYOL 1.314e-15 1.081e-14 1.210e-01 0.90333
## Away_TeamGETAFE 3.455e-15 1.136e-14 3.040e-01 0.76103
## Away_TeamGIJÓN -2.788e-15 1.357e-14 -2.060e-01 0.83718
## Away_TeamGIRONA 1.295e-15 1.341e-14 9.700e-02 0.92304
## Away_TeamGRANADA 5.556e-15 1.227e-14 4.530e-01 0.65069
## Away_TeamHUESCA -5.770e-15 1.687e-14 -3.420e-01 0.73241
## Away_TeamLAS PALMAS 3.855e-15 1.255e-14 3.070e-01 0.75867
## Away_TeamLEGANÉS 1.878e-16 1.201e-14 1.600e-02 0.98753
## Away_TeamLEVANTE 3.926e-15 1.125e-14 3.490e-01 0.72723
## Away_TeamMÁLAGA 3.496e-16 1.139e-14 3.100e-02 0.97552
## Away_TeamOSASUNA 2.457e-15 1.705e-14 1.440e-01 0.88542
## Away_TeamRAYO VALLECANO 2.521e-15 1.244e-14 2.030e-01 0.83939
## Away_TeamREAL BETIS 5.916e-15 1.159e-14 5.110e-01 0.60974
## Away_TeamREAL MADRID -2.931e-16 1.191e-14 -2.500e-02 0.98037
## Away_TeamREAL SOCIEDAD -2.881e-15 1.102e-14 -2.610e-01 0.79377
## Away_TeamSEVILLA FC 2.177e-15 1.102e-14 1.980e-01 0.84337
## Away_TeamVALENCIA -1.260e-15 1.097e-14 -1.150e-01 0.90863
## Away_TeamVALLADOLID -7.733e-15 1.697e-14 -4.560e-01 0.64866
## Away_TeamVILLARREAL 7.902e-16 1.096e-14 7.200e-02 0.94256
## `Home_Team_Possession_%` -6.338e-16 5.510e-16 -1.150e+00 0.25016
## `Away_Team_Possession_%` NA NA NA NA
## Home_Team_Off_Target_Shots -1.284e-16 7.863e-15 -1.600e-02 0.98697
## Home_Team_On_Target_Shots 6.848e-16 7.861e-15 8.700e-02 0.93059
## Home_Team_Total_Shots -1.514e-16 7.830e-15 -1.900e-02 0.98458
## Home_Team_Blocked_Shots -4.022e-16 7.838e-15 -5.100e-02 0.95908
## Home_Team_Corners 9.752e-17 6.712e-16 1.450e-01 0.88449
## Home_Team_Throw_Ins 5.378e-16 2.939e-16 1.830e+00 0.06743 .
## `Home_Team_Pass_Success_%` 9.483e-16 5.849e-16 1.621e+00 0.10511
## Home_Team_Aerials_Won 2.015e-16 3.102e-16 6.500e-01 0.51607
## Home_Team_Clearances 3.064e-16 2.556e-16 1.199e+00 0.23075
## Home_Team_Fouls 1.032e-15 4.288e-16 2.407e+00 0.01617 *
## Home_Team_Yellow_Cards 1.000e+00 1.106e-15 9.038e+14 < 2e-16 ***
## Home_Team_Second_Yellow_Cards 1.860e-16 6.180e-15 3.000e-02 0.97600
## Home_Team_Red_Cards -6.464e-14 7.068e-15 -9.145e+00 < 2e-16 ***
## Away_Team_Off_Target_Shots 1.605e-16 6.698e-15 2.400e-02 0.98089
## Away_Team_On_Target_Shots -4.408e-16 6.735e-15 -6.500e-02 0.94783
## Away_Team_Total_Shots 6.775e-17 6.677e-15 1.000e-02 0.99191
## Away_Team_Blocked_Shots 9.607e-17 6.726e-15 1.400e-02 0.98861
## Away_Team_Corners 2.480e-16 7.285e-16 3.400e-01 0.73354
## Away_Team_Throw_Ins 1.607e-16 3.113e-16 5.160e-01 0.60576
## `Away_Team_Pass_Success_%` -5.703e-16 5.493e-16 -1.038e+00 0.29934
## Away_Team_Aerials_Won -4.728e-18 3.124e-16 -1.500e-02 0.98793
## Away_Team_Clearances 1.154e-16 2.403e-16 4.800e-01 0.63121
## Away_Team_Fouls 8.108e-16 4.228e-16 1.918e+00 0.05530 .
## Away_Team_Yellow_Cards 1.000e+00 1.113e-15 8.988e+14 < 2e-16 ***
## Away_Team_Second_Yellow_Cards 2.468e-15 5.383e-15 4.580e-01 0.64667
## Away_Team_Red_Cards 6.888e-15 6.690e-15 1.030e+00 0.30334
## Home_Team_Goals_Scored 1.529e-15 1.895e-15 8.070e-01 0.41988
## Away_Team_Goals_Scored 1.280e-15 2.152e-15 5.950e-01 0.55205
## year -4.512e-13 1.985e-13 -2.273e+00 0.02311 *
## scorex 8.124e-15 4.857e-15 1.673e+00 0.09453 .
## score2 1.140e-14 6.830e-15 1.669e+00 0.09532 .
## goals NA NA NA NA
## home_points NA NA NA NA
## away_points NA NA NA NA
## jornada -1.168e-14 5.223e-15 -2.236e+00 0.02549 *
## total_off_target_shots NA NA NA NA
## total_on_target_shots NA NA NA NA
## total_shots NA NA NA NA
## total_blocked_shots NA NA NA NA
## total_corners NA NA NA NA
## total_throw_ins NA NA NA NA
## total_pass_success NA NA NA NA
## total_aerials_won NA NA NA NA
## total_clearances NA NA NA NA
## total_fouls NA NA NA NA
## total_second_yellow_cards NA NA NA NA
## total_red_cards NA NA NA NA
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 6.301e-14 on 1809 degrees of freedom
## Multiple R-squared: 1, Adjusted R-squared: 1
## F-statistic: 2.773e+28 on 90 and 1809 DF, p-value: < 2.2e-16
TOTAL TARJETAS ROJAS
lm_rojas <- lm(total_red_cards~., data = train)
summary(lm_rojas)##
## Call:
## lm(formula = total_red_cards ~ ., data = train)
##
## Residuals:
## Min 1Q Median 3Q Max
## -3.513e-15 -1.096e-16 -1.700e-18 1.014e-16 1.939e-14
##
## Coefficients: (16 not defined because of singularities)
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -8.890e-12 3.983e-12 -2.232e+00 0.025747 *
## ...1 -1.174e-17 5.204e-18 -2.257e+00 0.024135 *
## Home_TeamALMERÍA 1.472e-16 1.722e-16 8.550e-01 0.392557
## Home_TeamATHLETIC 1.713e-16 1.090e-16 1.572e+00 0.116172
## Home_TeamATLETICO MADRID -1.190e-17 1.103e-16 -1.080e-01 0.914080
## Home_TeamBARCELONA 2.274e-16 1.263e-16 1.801e+00 0.071865 .
## Home_TeamCELTA 1.055e-16 1.117e-16 9.440e-01 0.345197
## Home_TeamCÓRDOBA 1.200e-16 1.721e-16 6.980e-01 0.485473
## Home_TeamDEPORTIVO 2.450e-16 1.135e-16 2.159e+00 0.030989 *
## Home_TeamEIBAR 2.730e-16 1.112e-16 2.455e+00 0.014173 *
## Home_TeamELCHE 2.085e-17 1.726e-16 1.210e-01 0.903879
## Home_TeamESPANYOL 3.264e-16 1.076e-16 3.035e+00 0.002440 **
## Home_TeamGETAFE 1.995e-16 1.134e-16 1.760e+00 0.078576 .
## Home_TeamGIJÓN -1.320e-17 1.359e-16 -9.700e-02 0.922637
## Home_TeamGIRONA 9.597e-17 1.339e-16 7.160e-01 0.473807
## Home_TeamGRANADA 2.705e-16 1.217e-16 2.223e+00 0.026344 *
## Home_TeamHUESCA 5.003e-17 1.690e-16 2.960e-01 0.767209
## Home_TeamLAS PALMAS -2.985e-17 1.268e-16 -2.350e-01 0.813881
## Home_TeamLEGANÉS 2.100e-16 1.194e-16 1.758e+00 0.078858 .
## Home_TeamLEVANTE -7.072e-18 1.126e-16 -6.300e-02 0.949943
## Home_TeamMÁLAGA 4.538e-16 1.134e-16 4.002e+00 6.53e-05 ***
## Home_TeamOSASUNA 2.591e-16 1.705e-16 1.519e+00 0.128815
## Home_TeamRAYO VALLECANO 5.124e-16 1.236e-16 4.145e+00 3.56e-05 ***
## Home_TeamREAL BETIS 5.663e-17 1.159e-16 4.890e-01 0.625050
## Home_TeamREAL MADRID 1.179e-16 1.211e-16 9.740e-01 0.330135
## Home_TeamREAL SOCIEDAD 2.686e-16 1.103e-16 2.436e+00 0.014936 *
## Home_TeamSEVILLA FC 1.991e-16 1.120e-16 1.778e+00 0.075596 .
## Home_TeamVALENCIA -1.583e-16 1.098e-16 -1.443e+00 0.149266
## Home_TeamVALLADOLID -1.817e-16 1.700e-16 -1.069e+00 0.285124
## Home_TeamVILLARREAL 2.711e-17 1.098e-16 2.470e-01 0.804950
## Away_TeamALMERÍA -4.599e-16 1.723e-16 -2.669e+00 0.007666 **
## Away_TeamATHLETIC 1.113e-16 1.090e-16 1.022e+00 0.307115
## Away_TeamATLETICO MADRID -1.479e-16 1.099e-16 -1.346e+00 0.178433
## Away_TeamBARCELONA -3.619e-16 1.267e-16 -2.856e+00 0.004343 **
## Away_TeamCELTA -4.455e-17 1.107e-16 -4.030e-01 0.687337
## Away_TeamCÓRDOBA 6.728e-17 1.725e-16 3.900e-01 0.696523
## Away_TeamDEPORTIVO -8.684e-17 1.140e-16 -7.620e-01 0.446295
## Away_TeamEIBAR 4.037e-17 1.098e-16 3.680e-01 0.713225
## Away_TeamELCHE 1.782e-16 1.721e-16 1.036e+00 0.300437
## Away_TeamESPANYOL -5.646e-17 1.078e-16 -5.240e-01 0.600371
## Away_TeamGETAFE -1.573e-17 1.132e-16 -1.390e-01 0.889448
## Away_TeamGIJÓN 7.263e-18 1.352e-16 5.400e-02 0.957154
## Away_TeamGIRONA 1.522e-16 1.336e-16 1.139e+00 0.254749
## Away_TeamGRANADA -2.544e-16 1.222e-16 -2.081e+00 0.037532 *
## Away_TeamHUESCA 2.129e-17 1.681e-16 1.270e-01 0.899256
## Away_TeamLAS PALMAS -2.285e-16 1.250e-16 -1.828e+00 0.067679 .
## Away_TeamLEGANÉS -2.033e-16 1.197e-16 -1.699e+00 0.089505 .
## Away_TeamLEVANTE -5.771e-17 1.121e-16 -5.150e-01 0.606899
## Away_TeamMÁLAGA -1.990e-16 1.135e-16 -1.753e+00 0.079707 .
## Away_TeamOSASUNA -3.166e-16 1.699e-16 -1.864e+00 0.062468 .
## Away_TeamRAYO VALLECANO -6.088e-17 1.239e-16 -4.910e-01 0.623314
## Away_TeamREAL BETIS -1.268e-16 1.155e-16 -1.098e+00 0.272374
## Away_TeamREAL MADRID -2.406e-16 1.187e-16 -2.027e+00 0.042797 *
## Away_TeamREAL SOCIEDAD -2.366e-16 1.098e-16 -2.154e+00 0.031334 *
## Away_TeamSEVILLA FC -1.110e-16 1.098e-16 -1.011e+00 0.312202
## Away_TeamVALENCIA -4.479e-16 1.093e-16 -4.096e+00 4.39e-05 ***
## Away_TeamVALLADOLID -1.303e-16 1.691e-16 -7.710e-01 0.441056
## Away_TeamVILLARREAL -2.657e-17 1.093e-16 -2.430e-01 0.807900
## `Home_Team_Possession_%` 4.990e-18 5.490e-18 9.090e-01 0.363495
## `Away_Team_Possession_%` NA NA NA NA
## Home_Team_Off_Target_Shots 2.504e-16 7.835e-17 3.196e+00 0.001417 **
## Home_Team_On_Target_Shots 2.381e-16 7.833e-17 3.040e+00 0.002403 **
## Home_Team_Total_Shots -2.566e-16 7.802e-17 -3.289e+00 0.001025 **
## Home_Team_Blocked_Shots 2.605e-16 7.810e-17 3.336e+00 0.000867 ***
## Home_Team_Corners -9.229e-18 6.688e-18 -1.380e+00 0.167764
## Home_Team_Throw_Ins -1.795e-17 2.929e-18 -6.131e+00 1.07e-09 ***
## `Home_Team_Pass_Success_%` -5.225e-18 5.828e-18 -8.970e-01 0.370034
## Home_Team_Aerials_Won -2.906e-18 3.090e-18 -9.400e-01 0.347224
## Home_Team_Clearances -2.265e-19 2.547e-18 -8.900e-02 0.929127
## Home_Team_Fouls -3.446e-18 4.273e-18 -8.070e-01 0.420013
## Home_Team_Yellow_Cards 7.151e-18 1.102e-17 6.490e-01 0.516635
## Home_Team_Second_Yellow_Cards -4.852e-17 6.158e-17 -7.880e-01 0.430906
## Home_Team_Red_Cards 1.000e+00 7.043e-17 1.420e+16 < 2e-16 ***
## Away_Team_Off_Target_Shots 2.135e-18 6.674e-17 3.200e-02 0.974488
## Away_Team_On_Target_Shots 3.566e-17 6.711e-17 5.310e-01 0.595225
## Away_Team_Total_Shots -1.340e-17 6.653e-17 -2.010e-01 0.840444
## Away_Team_Blocked_Shots 1.330e-17 6.702e-17 1.980e-01 0.842727
## Away_Team_Corners -6.310e-18 7.259e-18 -8.690e-01 0.384793
## Away_Team_Throw_Ins -4.529e-18 3.102e-18 -1.460e+00 0.144423
## `Away_Team_Pass_Success_%` 6.245e-18 5.474e-18 1.141e+00 0.254078
## Away_Team_Aerials_Won -3.594e-18 3.113e-18 -1.154e+00 0.248530
## Away_Team_Clearances 2.548e-18 2.394e-18 1.064e+00 0.287458
## Away_Team_Fouls -6.920e-18 4.213e-18 -1.643e+00 0.100640
## Away_Team_Yellow_Cards -1.516e-18 1.109e-17 -1.370e-01 0.891272
## Away_Team_Second_Yellow_Cards -4.239e-17 5.364e-17 -7.900e-01 0.429435
## Away_Team_Red_Cards 1.000e+00 6.666e-17 1.500e+16 < 2e-16 ***
## Home_Team_Goals_Scored -2.444e-17 1.888e-17 -1.294e+00 0.195679
## Away_Team_Goals_Scored 1.109e-17 2.144e-17 5.170e-01 0.605081
## year 4.414e-15 1.978e-15 2.232e+00 0.025727 *
## scorex -9.460e-17 4.839e-17 -1.955e+00 0.050752 .
## score2 -1.871e-16 6.805e-17 -2.749e+00 0.006045 **
## goals NA NA NA NA
## home_points NA NA NA NA
## away_points NA NA NA NA
## jornada 1.151e-16 5.205e-17 2.211e+00 0.027187 *
## total_off_target_shots NA NA NA NA
## total_on_target_shots NA NA NA NA
## total_shots NA NA NA NA
## total_blocked_shots NA NA NA NA
## total_corners NA NA NA NA
## total_throw_ins NA NA NA NA
## total_pass_success NA NA NA NA
## total_aerials_won NA NA NA NA
## total_clearances NA NA NA NA
## total_fouls NA NA NA NA
## total_yellow_cards NA NA NA NA
## total_second_yellow_cards NA NA NA NA
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 6.278e-16 on 1809 degrees of freedom
## Multiple R-squared: 1, Adjusted R-squared: 1
## F-statistic: 5.493e+30 on 90 and 1809 DF, p-value: < 2.2e-16
5.1 REGRESION BACKWARD STEPWISE
5.2 REGRESION FORWARD STEPWISE
6 CONCLUSIONES
- Hay muchas variables que no afectan al resultado de un
partido.
- Los equipos locales ganan más.
- Hay dos equipos que sobresalen (Madrid y Barsa)
- Hay un grupo de equipos “buenos” (nunca han descendido, meten más
goles…)
De cara al futuro:
- Cuanto se parecen dos partidos?
- Clusterizar equipos en buenos, medios y malos.
- Incluir las rachas de victorias, dorrotas y empates.
- Calcular los puntos que suma cada equipo por partido en función de
ser local o visitante, del “nivel” del rival, etc.
- Predecir el número de goles que va a marcar cada equipo en un
partido, en vez de victoria/derrota/empate.